Theorem ramub1lem1 16992

Description: Lemma for ramub1 16994. (Contributed by Mario Carneiro, 23-Apr-2015.)

Hypotheses

Ref	Expression
ramub1.m	⊢ (𝜑 → 𝑀 ∈ ℕ)
ramub1.r	⊢ (𝜑 → 𝑅 ∈ Fin)
ramub1.f	⊢ (𝜑 → 𝐹:𝑅⟶ℕ)
ramub1.g	⊢ 𝐺 = (𝑥 ∈ 𝑅 ↦ (𝑀 Ramsey (𝑦 ∈ 𝑅 ↦ if(𝑦 = 𝑥, ((𝐹‘𝑥) − 1), (𝐹‘𝑦)))))
ramub1.1	⊢ (𝜑 → 𝐺:𝑅⟶ℕ0)
ramub1.2	⊢ (𝜑 → ((𝑀 − 1) Ramsey 𝐺) ∈ ℕ0)
ramub1.3	⊢ 𝐶 = (𝑎 ∈ V, 𝑖 ∈ ℕ0 ↦ {𝑏 ∈ 𝒫 𝑎 ∣ (♯‘𝑏) = 𝑖})
ramub1.4	⊢ (𝜑 → 𝑆 ∈ Fin)
ramub1.5	⊢ (𝜑 → (♯‘𝑆) = (((𝑀 − 1) Ramsey 𝐺) + 1))
ramub1.6	⊢ (𝜑 → 𝐾:(𝑆𝐶𝑀)⟶𝑅)
ramub1.x	⊢ (𝜑 → 𝑋 ∈ 𝑆)
ramub1.h	⊢ 𝐻 = (𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ↦ (𝐾‘(𝑢 ∪ {𝑋})))
ramub1.d	⊢ (𝜑 → 𝐷 ∈ 𝑅)
ramub1.w	⊢ (𝜑 → 𝑊 ⊆ (𝑆 ∖ {𝑋}))
ramub1.7	⊢ (𝜑 → (𝐺‘𝐷) ≤ (♯‘𝑊))
ramub1.8	⊢ (𝜑 → (𝑊𝐶(𝑀 − 1)) ⊆ (◡𝐻 “ {𝐷}))
ramub1.e	⊢ (𝜑 → 𝐸 ∈ 𝑅)
ramub1.v	⊢ (𝜑 → 𝑉 ⊆ 𝑊)
ramub1.9	⊢ (𝜑 → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) ≤ (♯‘𝑉))
ramub1.s	⊢ (𝜑 → (𝑉𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))

Assertion

Ref	Expression
ramub1lem1	⊢ (𝜑 → ∃𝑧 ∈ 𝒫 𝑆((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))

Distinct variable groups:   𝑥,𝑢,𝐷   𝑦,𝑢,𝑧,𝐹,𝑥   𝑎,𝑏,𝑖,𝑢,𝑥,𝑦,𝑧,𝑀   𝐺,𝑎,𝑖,𝑢,𝑥,𝑦,𝑧   𝑢,𝑅,𝑥,𝑦,𝑧   𝑊,𝑎,𝑖,𝑢   𝜑,𝑢,𝑥,𝑦,𝑧   𝑆,𝑎,𝑖,𝑢,𝑥,𝑦,𝑧   𝑉,𝑎,𝑖,𝑥,𝑧   𝑢,𝐶,𝑥,𝑦,𝑧   𝑢,𝐻,𝑥,𝑦,𝑧   𝑢,𝐾,𝑥,𝑦,𝑧   𝑥,𝐸,𝑧   𝑋,𝑎,𝑖,𝑢,𝑥,𝑦,𝑧

Allowed substitution hints:   𝜑(𝑖,𝑎,𝑏)   𝐶(𝑖,𝑎,𝑏)   𝐷(𝑦,𝑧,𝑖,𝑎,𝑏)   𝑅(𝑖,𝑎,𝑏)   𝑆(𝑏)   𝐸(𝑦,𝑢,𝑖,𝑎,𝑏)   𝐹(𝑖,𝑎,𝑏)   𝐺(𝑏)   𝐻(𝑖,𝑎,𝑏)   𝐾(𝑖,𝑎,𝑏)   𝑉(𝑦,𝑢,𝑏)   𝑊(𝑥,𝑦,𝑧,𝑏)   𝑋(𝑏)

Proof of Theorem ramub1lem1

Step	Hyp	Ref	Expression
1		ramub1.4	. . . . 5 ⊢ (𝜑 → 𝑆 ∈ Fin)
2		ramub1.v	. . . . . . . 8 ⊢ (𝜑 → 𝑉 ⊆ 𝑊)
3		ramub1.w	. . . . . . . 8 ⊢ (𝜑 → 𝑊 ⊆ (𝑆 ∖ {𝑋}))
4	2, 3	sstrd 3933	. . . . . . 7 ⊢ (𝜑 → 𝑉 ⊆ (𝑆 ∖ {𝑋}))
5	4	difss2d 4080	. . . . . 6 ⊢ (𝜑 → 𝑉 ⊆ 𝑆)
6		ramub1.x	. . . . . . 7 ⊢ (𝜑 → 𝑋 ∈ 𝑆)
7	6	snssd 4753	. . . . . 6 ⊢ (𝜑 → {𝑋} ⊆ 𝑆)
8	5, 7	unssd 4133	. . . . 5 ⊢ (𝜑 → (𝑉 ∪ {𝑋}) ⊆ 𝑆)
9	1, 8	sselpwd 5266	. . . 4 ⊢ (𝜑 → (𝑉 ∪ {𝑋}) ∈ 𝒫 𝑆)
10	9	adantr 480	. . 3 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (𝑉 ∪ {𝑋}) ∈ 𝒫 𝑆)
11		iftrue 4473	. . . . . . 7 ⊢ (𝐸 = 𝐷 → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) = ((𝐹‘𝐷) − 1))
12	11	adantl 481	. . . . . 6 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) = ((𝐹‘𝐷) − 1))
13		ramub1.9	. . . . . . 7 ⊢ (𝜑 → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) ≤ (♯‘𝑉))
14	13	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) ≤ (♯‘𝑉))
15	12, 14	eqbrtrrd 5110	. . . . 5 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → ((𝐹‘𝐷) − 1) ≤ (♯‘𝑉))
16		ramub1.f	. . . . . . . . 9 ⊢ (𝜑 → 𝐹:𝑅⟶ℕ)
17		ramub1.d	. . . . . . . . 9 ⊢ (𝜑 → 𝐷 ∈ 𝑅)
18	16, 17	ffvelcdmd 7033	. . . . . . . 8 ⊢ (𝜑 → (𝐹‘𝐷) ∈ ℕ)
19	18	adantr 480	. . . . . . 7 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (𝐹‘𝐷) ∈ ℕ)
20	19	nnred 12184	. . . . . 6 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (𝐹‘𝐷) ∈ ℝ)
21		1red 11140	. . . . . 6 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → 1 ∈ ℝ)
22	1, 5	ssfid 9174	. . . . . . . 8 ⊢ (𝜑 → 𝑉 ∈ Fin)
23		hashcl 14313	. . . . . . . 8 ⊢ (𝑉 ∈ Fin → (♯‘𝑉) ∈ ℕ0)
24		nn0re 12441	. . . . . . . 8 ⊢ ((♯‘𝑉) ∈ ℕ0 → (♯‘𝑉) ∈ ℝ)
25	22, 23, 24	3syl 18	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑉) ∈ ℝ)
26	25	adantr 480	. . . . . 6 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (♯‘𝑉) ∈ ℝ)
27	20, 21, 26	lesubaddd 11742	. . . . 5 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (((𝐹‘𝐷) − 1) ≤ (♯‘𝑉) ↔ (𝐹‘𝐷) ≤ ((♯‘𝑉) + 1)))
28	15, 27	mpbid 232	. . . 4 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (𝐹‘𝐷) ≤ ((♯‘𝑉) + 1))
29		fveq2 6836	. . . . 5 ⊢ (𝐸 = 𝐷 → (𝐹‘𝐸) = (𝐹‘𝐷))
30		snidg 4605	. . . . . . . 8 ⊢ (𝑋 ∈ 𝑆 → 𝑋 ∈ {𝑋})
31	6, 30	syl 17	. . . . . . 7 ⊢ (𝜑 → 𝑋 ∈ {𝑋})
32	4	sseld 3921	. . . . . . . 8 ⊢ (𝜑 → (𝑋 ∈ 𝑉 → 𝑋 ∈ (𝑆 ∖ {𝑋})))
33		eldifn 4073	. . . . . . . 8 ⊢ (𝑋 ∈ (𝑆 ∖ {𝑋}) → ¬ 𝑋 ∈ {𝑋})
34	32, 33	syl6 35	. . . . . . 7 ⊢ (𝜑 → (𝑋 ∈ 𝑉 → ¬ 𝑋 ∈ {𝑋}))
35	31, 34	mt2d 136	. . . . . 6 ⊢ (𝜑 → ¬ 𝑋 ∈ 𝑉)
36		hashunsng 14349	. . . . . . 7 ⊢ (𝑋 ∈ 𝑆 → ((𝑉 ∈ Fin ∧ ¬ 𝑋 ∈ 𝑉) → (♯‘(𝑉 ∪ {𝑋})) = ((♯‘𝑉) + 1)))
37	6, 36	syl 17	. . . . . 6 ⊢ (𝜑 → ((𝑉 ∈ Fin ∧ ¬ 𝑋 ∈ 𝑉) → (♯‘(𝑉 ∪ {𝑋})) = ((♯‘𝑉) + 1)))
38	22, 35, 37	mp2and 700	. . . . 5 ⊢ (𝜑 → (♯‘(𝑉 ∪ {𝑋})) = ((♯‘𝑉) + 1))
39	29, 38	breqan12rd 5103	. . . 4 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → ((𝐹‘𝐸) ≤ (♯‘(𝑉 ∪ {𝑋})) ↔ (𝐹‘𝐷) ≤ ((♯‘𝑉) + 1)))
40	28, 39	mpbird 257	. . 3 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (𝐹‘𝐸) ≤ (♯‘(𝑉 ∪ {𝑋})))
41		snfi 8985	. . . . . . 7 ⊢ {𝑋} ∈ Fin
42		unfi 9100	. . . . . . 7 ⊢ ((𝑉 ∈ Fin ∧ {𝑋} ∈ Fin) → (𝑉 ∪ {𝑋}) ∈ Fin)
43	22, 41, 42	sylancl 587	. . . . . 6 ⊢ (𝜑 → (𝑉 ∪ {𝑋}) ∈ Fin)
44		ramub1.m	. . . . . . 7 ⊢ (𝜑 → 𝑀 ∈ ℕ)
45	44	nnnn0d 12493	. . . . . 6 ⊢ (𝜑 → 𝑀 ∈ ℕ0)
46		ramub1.3	. . . . . . 7 ⊢ 𝐶 = (𝑎 ∈ V, 𝑖 ∈ ℕ0 ↦ {𝑏 ∈ 𝒫 𝑎 ∣ (♯‘𝑏) = 𝑖})
47	46	hashbcval 16968	. . . . . 6 ⊢ (((𝑉 ∪ {𝑋}) ∈ Fin ∧ 𝑀 ∈ ℕ0) → ((𝑉 ∪ {𝑋})𝐶𝑀) = {𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∣ (♯‘𝑥) = 𝑀})
48	43, 45, 47	syl2anc 585	. . . . 5 ⊢ (𝜑 → ((𝑉 ∪ {𝑋})𝐶𝑀) = {𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∣ (♯‘𝑥) = 𝑀})
49	48	adantr 480	. . . 4 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → ((𝑉 ∪ {𝑋})𝐶𝑀) = {𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∣ (♯‘𝑥) = 𝑀})
50		simpl1l 1226	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ 𝑥 ∈ 𝒫 𝑉) → 𝜑)
51	46	hashbcval 16968	. . . . . . . . . 10 ⊢ ((𝑉 ∈ Fin ∧ 𝑀 ∈ ℕ0) → (𝑉𝐶𝑀) = {𝑥 ∈ 𝒫 𝑉 ∣ (♯‘𝑥) = 𝑀})
52	22, 45, 51	syl2anc 585	. . . . . . . . 9 ⊢ (𝜑 → (𝑉𝐶𝑀) = {𝑥 ∈ 𝒫 𝑉 ∣ (♯‘𝑥) = 𝑀})
53		ramub1.s	. . . . . . . . 9 ⊢ (𝜑 → (𝑉𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))
54	52, 53	eqsstrrd 3958	. . . . . . . 8 ⊢ (𝜑 → {𝑥 ∈ 𝒫 𝑉 ∣ (♯‘𝑥) = 𝑀} ⊆ (◡𝐾 “ {𝐸}))
55	50, 54	syl 17	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ 𝑥 ∈ 𝒫 𝑉) → {𝑥 ∈ 𝒫 𝑉 ∣ (♯‘𝑥) = 𝑀} ⊆ (◡𝐾 “ {𝐸}))
56		simpr 484	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ 𝒫 𝑉)
57		simpl3 1195	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ 𝑥 ∈ 𝒫 𝑉) → (♯‘𝑥) = 𝑀)
58		rabid 3411	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑥 ∈ 𝒫 𝑉 ∣ (♯‘𝑥) = 𝑀} ↔ (𝑥 ∈ 𝒫 𝑉 ∧ (♯‘𝑥) = 𝑀))
59	56, 57, 58	sylanbrc 584	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ {𝑥 ∈ 𝒫 𝑉 ∣ (♯‘𝑥) = 𝑀})
60	55, 59	sseldd 3923	. . . . . 6 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ (◡𝐾 “ {𝐸}))
61		simpl2 1194	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}))
62	61	elpwid 4551	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ⊆ (𝑉 ∪ {𝑋}))
63		simpl1l 1226	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝜑)
64	63, 8	syl 17	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑉 ∪ {𝑋}) ⊆ 𝑆)
65	62, 64	sstrd 3933	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ⊆ 𝑆)
66		vex 3434	. . . . . . . . . . 11 ⊢ 𝑥 ∈ V
67	66	elpw 4546	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝒫 𝑆 ↔ 𝑥 ⊆ 𝑆)
68	65, 67	sylibr 234	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ 𝒫 𝑆)
69		simpl3 1195	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (♯‘𝑥) = 𝑀)
70		rabid 3411	. . . . . . . . 9 ⊢ (𝑥 ∈ {𝑥 ∈ 𝒫 𝑆 ∣ (♯‘𝑥) = 𝑀} ↔ (𝑥 ∈ 𝒫 𝑆 ∧ (♯‘𝑥) = 𝑀))
71	68, 69, 70	sylanbrc 584	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ {𝑥 ∈ 𝒫 𝑆 ∣ (♯‘𝑥) = 𝑀})
72	46	hashbcval 16968	. . . . . . . . . 10 ⊢ ((𝑆 ∈ Fin ∧ 𝑀 ∈ ℕ0) → (𝑆𝐶𝑀) = {𝑥 ∈ 𝒫 𝑆 ∣ (♯‘𝑥) = 𝑀})
73	1, 45, 72	syl2anc 585	. . . . . . . . 9 ⊢ (𝜑 → (𝑆𝐶𝑀) = {𝑥 ∈ 𝒫 𝑆 ∣ (♯‘𝑥) = 𝑀})
74	63, 73	syl 17	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑆𝐶𝑀) = {𝑥 ∈ 𝒫 𝑆 ∣ (♯‘𝑥) = 𝑀})
75	71, 74	eleqtrrd 2840	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ (𝑆𝐶𝑀))
76	3	difss2d 4080	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑊 ⊆ 𝑆)
77	1, 76	ssfid 9174	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑊 ∈ Fin)
78		nnm1nn0 12473	. . . . . . . . . . . . . . 15 ⊢ (𝑀 ∈ ℕ → (𝑀 − 1) ∈ ℕ0)
79	44, 78	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑀 − 1) ∈ ℕ0)
80	46	hashbcval 16968	. . . . . . . . . . . . . 14 ⊢ ((𝑊 ∈ Fin ∧ (𝑀 − 1) ∈ ℕ0) → (𝑊𝐶(𝑀 − 1)) = {𝑢 ∈ 𝒫 𝑊 ∣ (♯‘𝑢) = (𝑀 − 1)})
81	77, 79, 80	syl2anc 585	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑊𝐶(𝑀 − 1)) = {𝑢 ∈ 𝒫 𝑊 ∣ (♯‘𝑢) = (𝑀 − 1)})
82		ramub1.8	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑊𝐶(𝑀 − 1)) ⊆ (◡𝐻 “ {𝐷}))
83	81, 82	eqsstrrd 3958	. . . . . . . . . . . 12 ⊢ (𝜑 → {𝑢 ∈ 𝒫 𝑊 ∣ (♯‘𝑢) = (𝑀 − 1)} ⊆ (◡𝐻 “ {𝐷}))
84	63, 83	syl 17	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → {𝑢 ∈ 𝒫 𝑊 ∣ (♯‘𝑢) = (𝑀 − 1)} ⊆ (◡𝐻 “ {𝐷}))
85		fveqeq2 6845	. . . . . . . . . . . 12 ⊢ (𝑢 = (𝑥 ∖ {𝑋}) → ((♯‘𝑢) = (𝑀 − 1) ↔ (♯‘(𝑥 ∖ {𝑋})) = (𝑀 − 1)))
86		uncom 4099	. . . . . . . . . . . . . . . 16 ⊢ (𝑉 ∪ {𝑋}) = ({𝑋} ∪ 𝑉)
87	62, 86	sseqtrdi 3963	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ⊆ ({𝑋} ∪ 𝑉))
88		ssundif 4428	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ⊆ ({𝑋} ∪ 𝑉) ↔ (𝑥 ∖ {𝑋}) ⊆ 𝑉)
89	87, 88	sylib 218	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ⊆ 𝑉)
90	63, 2	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑉 ⊆ 𝑊)
91	89, 90	sstrd 3933	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ⊆ 𝑊)
92	66	difexi 5268	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∖ {𝑋}) ∈ V
93	92	elpw 4546	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∖ {𝑋}) ∈ 𝒫 𝑊 ↔ (𝑥 ∖ {𝑋}) ⊆ 𝑊)
94	91, 93	sylibr 234	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ∈ 𝒫 𝑊)
95	63, 1	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑆 ∈ Fin)
96	95, 65	ssfid 9174	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ Fin)
97		diffi 9104	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ Fin → (𝑥 ∖ {𝑋}) ∈ Fin)
98	96, 97	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ∈ Fin)
99		hashcl 14313	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ∖ {𝑋}) ∈ Fin → (♯‘(𝑥 ∖ {𝑋})) ∈ ℕ0)
100		nn0cn 12442	. . . . . . . . . . . . . . 15 ⊢ ((♯‘(𝑥 ∖ {𝑋})) ∈ ℕ0 → (♯‘(𝑥 ∖ {𝑋})) ∈ ℂ)
101	98, 99, 100	3syl 18	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (♯‘(𝑥 ∖ {𝑋})) ∈ ℂ)
102		ax-1cn 11091	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℂ
103		pncan 11394	. . . . . . . . . . . . . 14 ⊢ (((♯‘(𝑥 ∖ {𝑋})) ∈ ℂ ∧ 1 ∈ ℂ) → (((♯‘(𝑥 ∖ {𝑋})) + 1) − 1) = (♯‘(𝑥 ∖ {𝑋})))
104	101, 102, 103	sylancl 587	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (((♯‘(𝑥 ∖ {𝑋})) + 1) − 1) = (♯‘(𝑥 ∖ {𝑋})))
105		neldifsnd 4737	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → ¬ 𝑋 ∈ (𝑥 ∖ {𝑋}))
106		hashunsng 14349	. . . . . . . . . . . . . . . . 17 ⊢ (𝑋 ∈ 𝑆 → (((𝑥 ∖ {𝑋}) ∈ Fin ∧ ¬ 𝑋 ∈ (𝑥 ∖ {𝑋})) → (♯‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = ((♯‘(𝑥 ∖ {𝑋})) + 1)))
107	63, 6, 106	3syl 18	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (((𝑥 ∖ {𝑋}) ∈ Fin ∧ ¬ 𝑋 ∈ (𝑥 ∖ {𝑋})) → (♯‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = ((♯‘(𝑥 ∖ {𝑋})) + 1)))
108	98, 105, 107	mp2and 700	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (♯‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = ((♯‘(𝑥 ∖ {𝑋})) + 1))
109		undif1 4417	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 ∖ {𝑋}) ∪ {𝑋}) = (𝑥 ∪ {𝑋})
110		simpr 484	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → ¬ 𝑥 ∈ 𝒫 𝑉)
111	61, 110	eldifd 3901	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ (𝒫 (𝑉 ∪ {𝑋}) ∖ 𝒫 𝑉))
112		elpwunsn 4629	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 ∈ (𝒫 (𝑉 ∪ {𝑋}) ∖ 𝒫 𝑉) → 𝑋 ∈ 𝑥)
113	111, 112	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑋 ∈ 𝑥)
114	113	snssd 4753	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → {𝑋} ⊆ 𝑥)
115		ssequn2 4130	. . . . . . . . . . . . . . . . . . 19 ⊢ ({𝑋} ⊆ 𝑥 ↔ (𝑥 ∪ {𝑋}) = 𝑥)
116	114, 115	sylib 218	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∪ {𝑋}) = 𝑥)
117	109, 116	eqtr2id 2785	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 = ((𝑥 ∖ {𝑋}) ∪ {𝑋}))
118	117	fveq2d 6840	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (♯‘𝑥) = (♯‘((𝑥 ∖ {𝑋}) ∪ {𝑋})))
119	118, 69	eqtr3d 2774	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (♯‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = 𝑀)
120	108, 119	eqtr3d 2774	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → ((♯‘(𝑥 ∖ {𝑋})) + 1) = 𝑀)
121	120	oveq1d 7377	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (((♯‘(𝑥 ∖ {𝑋})) + 1) − 1) = (𝑀 − 1))
122	104, 121	eqtr3d 2774	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (♯‘(𝑥 ∖ {𝑋})) = (𝑀 − 1))
123	85, 94, 122	elrabd 3637	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ∈ {𝑢 ∈ 𝒫 𝑊 ∣ (♯‘𝑢) = (𝑀 − 1)})
124	84, 123	sseldd 3923	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ∈ (◡𝐻 “ {𝐷}))
125		ramub1.h	. . . . . . . . . . . 12 ⊢ 𝐻 = (𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ↦ (𝐾‘(𝑢 ∪ {𝑋})))
126	125	mptiniseg 6199	. . . . . . . . . . 11 ⊢ (𝐷 ∈ 𝑅 → (◡𝐻 “ {𝐷}) = {𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ∣ (𝐾‘(𝑢 ∪ {𝑋})) = 𝐷})
127	63, 17, 126	3syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (◡𝐻 “ {𝐷}) = {𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ∣ (𝐾‘(𝑢 ∪ {𝑋})) = 𝐷})
128	124, 127	eleqtrd 2839	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ∈ {𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ∣ (𝐾‘(𝑢 ∪ {𝑋})) = 𝐷})
129		uneq1 4102	. . . . . . . . . . . 12 ⊢ (𝑢 = (𝑥 ∖ {𝑋}) → (𝑢 ∪ {𝑋}) = ((𝑥 ∖ {𝑋}) ∪ {𝑋}))
130	129	fveqeq2d 6844	. . . . . . . . . . 11 ⊢ (𝑢 = (𝑥 ∖ {𝑋}) → ((𝐾‘(𝑢 ∪ {𝑋})) = 𝐷 ↔ (𝐾‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = 𝐷))
131	130	elrab 3635	. . . . . . . . . 10 ⊢ ((𝑥 ∖ {𝑋}) ∈ {𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ∣ (𝐾‘(𝑢 ∪ {𝑋})) = 𝐷} ↔ ((𝑥 ∖ {𝑋}) ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ∧ (𝐾‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = 𝐷))
132	131	simprbi 497	. . . . . . . . 9 ⊢ ((𝑥 ∖ {𝑋}) ∈ {𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ∣ (𝐾‘(𝑢 ∪ {𝑋})) = 𝐷} → (𝐾‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = 𝐷)
133	128, 132	syl 17	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝐾‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = 𝐷)
134	117	fveq2d 6840	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝐾‘𝑥) = (𝐾‘((𝑥 ∖ {𝑋}) ∪ {𝑋})))
135		simpl1r 1227	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝐸 = 𝐷)
136	133, 134, 135	3eqtr4d 2782	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝐾‘𝑥) = 𝐸)
137		ramub1.6	. . . . . . . . 9 ⊢ (𝜑 → 𝐾:(𝑆𝐶𝑀)⟶𝑅)
138	137	ffnd 6665	. . . . . . . 8 ⊢ (𝜑 → 𝐾 Fn (𝑆𝐶𝑀))
139		fniniseg 7008	. . . . . . . 8 ⊢ (𝐾 Fn (𝑆𝐶𝑀) → (𝑥 ∈ (◡𝐾 “ {𝐸}) ↔ (𝑥 ∈ (𝑆𝐶𝑀) ∧ (𝐾‘𝑥) = 𝐸)))
140	63, 138, 139	3syl 18	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∈ (◡𝐾 “ {𝐸}) ↔ (𝑥 ∈ (𝑆𝐶𝑀) ∧ (𝐾‘𝑥) = 𝐸)))
141	75, 136, 140	mpbir2and 714	. . . . . 6 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ (◡𝐾 “ {𝐸}))
142	60, 141	pm2.61dan 813	. . . . 5 ⊢ (((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) → 𝑥 ∈ (◡𝐾 “ {𝐸}))
143	142	rabssdv 4015	. . . 4 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → {𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∣ (♯‘𝑥) = 𝑀} ⊆ (◡𝐾 “ {𝐸}))
144	49, 143	eqsstrd 3957	. . 3 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → ((𝑉 ∪ {𝑋})𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))
145		fveq2 6836	. . . . . 6 ⊢ (𝑧 = (𝑉 ∪ {𝑋}) → (♯‘𝑧) = (♯‘(𝑉 ∪ {𝑋})))
146	145	breq2d 5098	. . . . 5 ⊢ (𝑧 = (𝑉 ∪ {𝑋}) → ((𝐹‘𝐸) ≤ (♯‘𝑧) ↔ (𝐹‘𝐸) ≤ (♯‘(𝑉 ∪ {𝑋}))))
147		oveq1 7369	. . . . . 6 ⊢ (𝑧 = (𝑉 ∪ {𝑋}) → (𝑧𝐶𝑀) = ((𝑉 ∪ {𝑋})𝐶𝑀))
148	147	sseq1d 3954	. . . . 5 ⊢ (𝑧 = (𝑉 ∪ {𝑋}) → ((𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}) ↔ ((𝑉 ∪ {𝑋})𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))
149	146, 148	anbi12d 633	. . . 4 ⊢ (𝑧 = (𝑉 ∪ {𝑋}) → (((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})) ↔ ((𝐹‘𝐸) ≤ (♯‘(𝑉 ∪ {𝑋})) ∧ ((𝑉 ∪ {𝑋})𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))))
150	149	rspcev 3565	. . 3 ⊢ (((𝑉 ∪ {𝑋}) ∈ 𝒫 𝑆 ∧ ((𝐹‘𝐸) ≤ (♯‘(𝑉 ∪ {𝑋})) ∧ ((𝑉 ∪ {𝑋})𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))) → ∃𝑧 ∈ 𝒫 𝑆((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))
151	10, 40, 144, 150	syl12anc 837	. 2 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → ∃𝑧 ∈ 𝒫 𝑆((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))
152	1, 5	sselpwd 5266	. . . 4 ⊢ (𝜑 → 𝑉 ∈ 𝒫 𝑆)
153	152	adantr 480	. . 3 ⊢ ((𝜑 ∧ 𝐸 ≠ 𝐷) → 𝑉 ∈ 𝒫 𝑆)
154		ifnefalse 4479	. . . . 5 ⊢ (𝐸 ≠ 𝐷 → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) = (𝐹‘𝐸))
155	154	adantl 481	. . . 4 ⊢ ((𝜑 ∧ 𝐸 ≠ 𝐷) → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) = (𝐹‘𝐸))
156	13	adantr 480	. . . 4 ⊢ ((𝜑 ∧ 𝐸 ≠ 𝐷) → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) ≤ (♯‘𝑉))
157	155, 156	eqbrtrrd 5110	. . 3 ⊢ ((𝜑 ∧ 𝐸 ≠ 𝐷) → (𝐹‘𝐸) ≤ (♯‘𝑉))
158	53	adantr 480	. . 3 ⊢ ((𝜑 ∧ 𝐸 ≠ 𝐷) → (𝑉𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))
159		fveq2 6836	. . . . . 6 ⊢ (𝑧 = 𝑉 → (♯‘𝑧) = (♯‘𝑉))
160	159	breq2d 5098	. . . . 5 ⊢ (𝑧 = 𝑉 → ((𝐹‘𝐸) ≤ (♯‘𝑧) ↔ (𝐹‘𝐸) ≤ (♯‘𝑉)))
161		oveq1 7369	. . . . . 6 ⊢ (𝑧 = 𝑉 → (𝑧𝐶𝑀) = (𝑉𝐶𝑀))
162	161	sseq1d 3954	. . . . 5 ⊢ (𝑧 = 𝑉 → ((𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}) ↔ (𝑉𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))
163	160, 162	anbi12d 633	. . . 4 ⊢ (𝑧 = 𝑉 → (((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})) ↔ ((𝐹‘𝐸) ≤ (♯‘𝑉) ∧ (𝑉𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))))
164	163	rspcev 3565	. . 3 ⊢ ((𝑉 ∈ 𝒫 𝑆 ∧ ((𝐹‘𝐸) ≤ (♯‘𝑉) ∧ (𝑉𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))) → ∃𝑧 ∈ 𝒫 𝑆((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))
165	153, 157, 158, 164	syl12anc 837	. 2 ⊢ ((𝜑 ∧ 𝐸 ≠ 𝐷) → ∃𝑧 ∈ 𝒫 𝑆((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))
166	151, 165	pm2.61dane 3020	1 ⊢ (𝜑 → ∃𝑧 ∈ 𝒫 𝑆((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1087   = wceq 1542   ∈ wcel 2114   ≠ wne 2933  ∃wrex 3062  {crab 3390  Vcvv 3430   ∖ cdif 3887   ∪ cun 3888   ⊆ wss 3890  ifcif 4467  𝒫 cpw 4542  {csn 4568   class class class wbr 5086   ↦ cmpt 5167  ^◡ccnv 5625   “ cima 5629   Fn wfn 6489  ⟶wf 6490  ‘cfv 6494  (class class class)co 7362   ∈ cmpo 7364  Fincfn 8888  ℂcc 11031  ℝcr 11032  1c1 11034   + caddc 11036   ≤ cle 11175   − cmin 11372  ℕcn 12169  ℕ₀cn0 12432  ♯chash 14287   Ramsey cram 16965

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-sep 5232  ax-nul 5242  ax-pow 5304  ax-pr 5372  ax-un 7684  ax-cnex 11089  ax-resscn 11090  ax-1cn 11091  ax-icn 11092  ax-addcl 11093  ax-addrcl 11094  ax-mulcl 11095  ax-mulrcl 11096  ax-mulcom 11097  ax-addass 11098  ax-mulass 11099  ax-distr 11100  ax-i2m1 11101  ax-1ne0 11102  ax-1rid 11103  ax-rnegex 11104  ax-rrecex 11105  ax-cnre 11106  ax-pre-lttri 11107  ax-pre-lttrn 11108  ax-pre-ltadd 11109  ax-pre-mulgt0 11110

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5521  df-eprel 5526  df-po 5534  df-so 5535  df-fr 5579  df-we 5581  df-xp 5632  df-rel 5633  df-cnv 5634  df-co 5635  df-dm 5636  df-rn 5637  df-res 5638  df-ima 5639  df-pred 6261  df-ord 6322  df-on 6323  df-lim 6324  df-suc 6325  df-iota 6450  df-fun 6496  df-fn 6497  df-f 6498  df-f1 6499  df-fo 6500  df-f1o 6501  df-fv 6502  df-riota 7319  df-ov 7365  df-oprab 7366  df-mpo 7367  df-om 7813  df-1st 7937  df-2nd 7938  df-frecs 8226  df-wrecs 8257  df-recs 8306  df-rdg 8344  df-1o 8400  df-oadd 8404  df-er 8638  df-en 8889  df-dom 8890  df-sdom 8891  df-fin 8892  df-dju 9820  df-card 9858  df-pnf 11176  df-mnf 11177  df-xr 11178  df-ltxr 11179  df-le 11180  df-sub 11374  df-neg 11375  df-nn 12170  df-n0 12433  df-z 12520  df-uz 12784  df-fz 13457  df-hash 14288

This theorem is referenced by:  ramub1lem2  16993