Theorem ramub1lem1 16364

Description: Lemma for ramub1 16366. (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 3979	. . . . . . 7 ⊢ (𝜑 → 𝑉 ⊆ (𝑆 ∖ {𝑋}))
5	4	difss2d 4113	. . . . . 6 ⊢ (𝜑 → 𝑉 ⊆ 𝑆)
6		ramub1.x	. . . . . . 7 ⊢ (𝜑 → 𝑋 ∈ 𝑆)
7	6	snssd 4744	. . . . . 6 ⊢ (𝜑 → {𝑋} ⊆ 𝑆)
8	5, 7	unssd 4164	. . . . 5 ⊢ (𝜑 → (𝑉 ∪ {𝑋}) ⊆ 𝑆)
9	1, 8	sselpwd 5232	. . . 4 ⊢ (𝜑 → (𝑉 ∪ {𝑋}) ∈ 𝒫 𝑆)
10	9	adantr 483	. . 3 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (𝑉 ∪ {𝑋}) ∈ 𝒫 𝑆)
11		iftrue 4475	. . . . . . 7 ⊢ (𝐸 = 𝐷 → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) = ((𝐹‘𝐷) − 1))
12	11	adantl 484	. . . . . 6 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) = ((𝐹‘𝐷) − 1))
13		ramub1.9	. . . . . . 7 ⊢ (𝜑 → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) ≤ (♯‘𝑉))
14	13	adantr 483	. . . . . 6 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) ≤ (♯‘𝑉))
15	12, 14	eqbrtrrd 5092	. . . . 5 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → ((𝐹‘𝐷) − 1) ≤ (♯‘𝑉))
16		ramub1.f	. . . . . . . . 9 ⊢ (𝜑 → 𝐹:𝑅⟶ℕ)
17		ramub1.d	. . . . . . . . 9 ⊢ (𝜑 → 𝐷 ∈ 𝑅)
18	16, 17	ffvelrnd 6854	. . . . . . . 8 ⊢ (𝜑 → (𝐹‘𝐷) ∈ ℕ)
19	18	adantr 483	. . . . . . 7 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (𝐹‘𝐷) ∈ ℕ)
20	19	nnred 11655	. . . . . 6 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (𝐹‘𝐷) ∈ ℝ)
21		1red 10644	. . . . . 6 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → 1 ∈ ℝ)
22	1, 5	ssfid 8743	. . . . . . . 8 ⊢ (𝜑 → 𝑉 ∈ Fin)
23		hashcl 13720	. . . . . . . 8 ⊢ (𝑉 ∈ Fin → (♯‘𝑉) ∈ ℕ0)
24		nn0re 11909	. . . . . . . 8 ⊢ ((♯‘𝑉) ∈ ℕ0 → (♯‘𝑉) ∈ ℝ)
25	22, 23, 24	3syl 18	. . . . . . 7 ⊢ (𝜑 → (♯‘𝑉) ∈ ℝ)
26	25	adantr 483	. . . . . 6 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (♯‘𝑉) ∈ ℝ)
27	20, 21, 26	lesubaddd 11239	. . . . 5 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (((𝐹‘𝐷) − 1) ≤ (♯‘𝑉) ↔ (𝐹‘𝐷) ≤ ((♯‘𝑉) + 1)))
28	15, 27	mpbid 234	. . . 4 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (𝐹‘𝐷) ≤ ((♯‘𝑉) + 1))
29		fveq2 6672	. . . . 5 ⊢ (𝐸 = 𝐷 → (𝐹‘𝐸) = (𝐹‘𝐷))
30		snidg 4601	. . . . . . . 8 ⊢ (𝑋 ∈ 𝑆 → 𝑋 ∈ {𝑋})
31	6, 30	syl 17	. . . . . . 7 ⊢ (𝜑 → 𝑋 ∈ {𝑋})
32	4	sseld 3968	. . . . . . . 8 ⊢ (𝜑 → (𝑋 ∈ 𝑉 → 𝑋 ∈ (𝑆 ∖ {𝑋})))
33		eldifn 4106	. . . . . . . 8 ⊢ (𝑋 ∈ (𝑆 ∖ {𝑋}) → ¬ 𝑋 ∈ {𝑋})
34	32, 33	syl6 35	. . . . . . 7 ⊢ (𝜑 → (𝑋 ∈ 𝑉 → ¬ 𝑋 ∈ {𝑋}))
35	31, 34	mt2d 138	. . . . . 6 ⊢ (𝜑 → ¬ 𝑋 ∈ 𝑉)
36		hashunsng 13756	. . . . . . 7 ⊢ (𝑋 ∈ 𝑆 → ((𝑉 ∈ Fin ∧ ¬ 𝑋 ∈ 𝑉) → (♯‘(𝑉 ∪ {𝑋})) = ((♯‘𝑉) + 1)))
37	6, 36	syl 17	. . . . . 6 ⊢ (𝜑 → ((𝑉 ∈ Fin ∧ ¬ 𝑋 ∈ 𝑉) → (♯‘(𝑉 ∪ {𝑋})) = ((♯‘𝑉) + 1)))
38	22, 35, 37	mp2and 697	. . . . 5 ⊢ (𝜑 → (♯‘(𝑉 ∪ {𝑋})) = ((♯‘𝑉) + 1))
39	29, 38	breqan12rd 5085	. . . 4 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → ((𝐹‘𝐸) ≤ (♯‘(𝑉 ∪ {𝑋})) ↔ (𝐹‘𝐷) ≤ ((♯‘𝑉) + 1)))
40	28, 39	mpbird 259	. . 3 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → (𝐹‘𝐸) ≤ (♯‘(𝑉 ∪ {𝑋})))
41		snfi 8596	. . . . . . 7 ⊢ {𝑋} ∈ Fin
42		unfi 8787	. . . . . . 7 ⊢ ((𝑉 ∈ Fin ∧ {𝑋} ∈ Fin) → (𝑉 ∪ {𝑋}) ∈ Fin)
43	22, 41, 42	sylancl 588	. . . . . 6 ⊢ (𝜑 → (𝑉 ∪ {𝑋}) ∈ Fin)
44		ramub1.m	. . . . . . 7 ⊢ (𝜑 → 𝑀 ∈ ℕ)
45	44	nnnn0d 11958	. . . . . 6 ⊢ (𝜑 → 𝑀 ∈ ℕ0)
46		ramub1.3	. . . . . . 7 ⊢ 𝐶 = (𝑎 ∈ V, 𝑖 ∈ ℕ0 ↦ {𝑏 ∈ 𝒫 𝑎 ∣ (♯‘𝑏) = 𝑖})
47	46	hashbcval 16340	. . . . . 6 ⊢ (((𝑉 ∪ {𝑋}) ∈ Fin ∧ 𝑀 ∈ ℕ0) → ((𝑉 ∪ {𝑋})𝐶𝑀) = {𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∣ (♯‘𝑥) = 𝑀})
48	43, 45, 47	syl2anc 586	. . . . 5 ⊢ (𝜑 → ((𝑉 ∪ {𝑋})𝐶𝑀) = {𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∣ (♯‘𝑥) = 𝑀})
49	48	adantr 483	. . . 4 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → ((𝑉 ∪ {𝑋})𝐶𝑀) = {𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∣ (♯‘𝑥) = 𝑀})
50		simpl1l 1220	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ 𝑥 ∈ 𝒫 𝑉) → 𝜑)
51	46	hashbcval 16340	. . . . . . . . . 10 ⊢ ((𝑉 ∈ Fin ∧ 𝑀 ∈ ℕ0) → (𝑉𝐶𝑀) = {𝑥 ∈ 𝒫 𝑉 ∣ (♯‘𝑥) = 𝑀})
52	22, 45, 51	syl2anc 586	. . . . . . . . 9 ⊢ (𝜑 → (𝑉𝐶𝑀) = {𝑥 ∈ 𝒫 𝑉 ∣ (♯‘𝑥) = 𝑀})
53		ramub1.s	. . . . . . . . 9 ⊢ (𝜑 → (𝑉𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))
54	52, 53	eqsstrrd 4008	. . . . . . . 8 ⊢ (𝜑 → {𝑥 ∈ 𝒫 𝑉 ∣ (♯‘𝑥) = 𝑀} ⊆ (◡𝐾 “ {𝐸}))
55	50, 54	syl 17	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ 𝑥 ∈ 𝒫 𝑉) → {𝑥 ∈ 𝒫 𝑉 ∣ (♯‘𝑥) = 𝑀} ⊆ (◡𝐾 “ {𝐸}))
56		simpr 487	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ 𝒫 𝑉)
57		simpl3 1189	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ 𝑥 ∈ 𝒫 𝑉) → (♯‘𝑥) = 𝑀)
58		rabid 3380	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑥 ∈ 𝒫 𝑉 ∣ (♯‘𝑥) = 𝑀} ↔ (𝑥 ∈ 𝒫 𝑉 ∧ (♯‘𝑥) = 𝑀))
59	56, 57, 58	sylanbrc 585	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ {𝑥 ∈ 𝒫 𝑉 ∣ (♯‘𝑥) = 𝑀})
60	55, 59	sseldd 3970	. . . . . 6 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ (◡𝐾 “ {𝐸}))
61		simpl2 1188	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}))
62	61	elpwid 4552	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ⊆ (𝑉 ∪ {𝑋}))
63		simpl1l 1220	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝜑)
64	63, 8	syl 17	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑉 ∪ {𝑋}) ⊆ 𝑆)
65	62, 64	sstrd 3979	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ⊆ 𝑆)
66		vex 3499	. . . . . . . . . . 11 ⊢ 𝑥 ∈ V
67	66	elpw 4545	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝒫 𝑆 ↔ 𝑥 ⊆ 𝑆)
68	65, 67	sylibr 236	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ 𝒫 𝑆)
69		simpl3 1189	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (♯‘𝑥) = 𝑀)
70		rabid 3380	. . . . . . . . 9 ⊢ (𝑥 ∈ {𝑥 ∈ 𝒫 𝑆 ∣ (♯‘𝑥) = 𝑀} ↔ (𝑥 ∈ 𝒫 𝑆 ∧ (♯‘𝑥) = 𝑀))
71	68, 69, 70	sylanbrc 585	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ {𝑥 ∈ 𝒫 𝑆 ∣ (♯‘𝑥) = 𝑀})
72	46	hashbcval 16340	. . . . . . . . . 10 ⊢ ((𝑆 ∈ Fin ∧ 𝑀 ∈ ℕ0) → (𝑆𝐶𝑀) = {𝑥 ∈ 𝒫 𝑆 ∣ (♯‘𝑥) = 𝑀})
73	1, 45, 72	syl2anc 586	. . . . . . . . 9 ⊢ (𝜑 → (𝑆𝐶𝑀) = {𝑥 ∈ 𝒫 𝑆 ∣ (♯‘𝑥) = 𝑀})
74	63, 73	syl 17	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑆𝐶𝑀) = {𝑥 ∈ 𝒫 𝑆 ∣ (♯‘𝑥) = 𝑀})
75	71, 74	eleqtrrd 2918	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ (𝑆𝐶𝑀))
76	3	difss2d 4113	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑊 ⊆ 𝑆)
77	1, 76	ssfid 8743	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑊 ∈ Fin)
78		nnm1nn0 11941	. . . . . . . . . . . . . . 15 ⊢ (𝑀 ∈ ℕ → (𝑀 − 1) ∈ ℕ0)
79	44, 78	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝑀 − 1) ∈ ℕ0)
80	46	hashbcval 16340	. . . . . . . . . . . . . 14 ⊢ ((𝑊 ∈ Fin ∧ (𝑀 − 1) ∈ ℕ0) → (𝑊𝐶(𝑀 − 1)) = {𝑢 ∈ 𝒫 𝑊 ∣ (♯‘𝑢) = (𝑀 − 1)})
81	77, 79, 80	syl2anc 586	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑊𝐶(𝑀 − 1)) = {𝑢 ∈ 𝒫 𝑊 ∣ (♯‘𝑢) = (𝑀 − 1)})
82		ramub1.8	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝑊𝐶(𝑀 − 1)) ⊆ (◡𝐻 “ {𝐷}))
83	81, 82	eqsstrrd 4008	. . . . . . . . . . . 12 ⊢ (𝜑 → {𝑢 ∈ 𝒫 𝑊 ∣ (♯‘𝑢) = (𝑀 − 1)} ⊆ (◡𝐻 “ {𝐷}))
84	63, 83	syl 17	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → {𝑢 ∈ 𝒫 𝑊 ∣ (♯‘𝑢) = (𝑀 − 1)} ⊆ (◡𝐻 “ {𝐷}))
85		fveqeq2 6681	. . . . . . . . . . . 12 ⊢ (𝑢 = (𝑥 ∖ {𝑋}) → ((♯‘𝑢) = (𝑀 − 1) ↔ (♯‘(𝑥 ∖ {𝑋})) = (𝑀 − 1)))
86		uncom 4131	. . . . . . . . . . . . . . . 16 ⊢ (𝑉 ∪ {𝑋}) = ({𝑋} ∪ 𝑉)
87	62, 86	sseqtrdi 4019	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ⊆ ({𝑋} ∪ 𝑉))
88		ssundif 4435	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ⊆ ({𝑋} ∪ 𝑉) ↔ (𝑥 ∖ {𝑋}) ⊆ 𝑉)
89	87, 88	sylib 220	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ⊆ 𝑉)
90	63, 2	syl 17	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑉 ⊆ 𝑊)
91	89, 90	sstrd 3979	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ⊆ 𝑊)
92	66	difexi 5234	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∖ {𝑋}) ∈ V
93	92	elpw 4545	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∖ {𝑋}) ∈ 𝒫 𝑊 ↔ (𝑥 ∖ {𝑋}) ⊆ 𝑊)
94	91, 93	sylibr 236	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ∈ 𝒫 𝑊)
95	63, 1	syl 17	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑆 ∈ Fin)
96	95, 65	ssfid 8743	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ Fin)
97		diffi 8752	. . . . . . . . . . . . . . . 16 ⊢ (𝑥 ∈ Fin → (𝑥 ∖ {𝑋}) ∈ Fin)
98	96, 97	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ∈ Fin)
99		hashcl 13720	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ∖ {𝑋}) ∈ Fin → (♯‘(𝑥 ∖ {𝑋})) ∈ ℕ0)
100		nn0cn 11910	. . . . . . . . . . . . . . 15 ⊢ ((♯‘(𝑥 ∖ {𝑋})) ∈ ℕ0 → (♯‘(𝑥 ∖ {𝑋})) ∈ ℂ)
101	98, 99, 100	3syl 18	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (♯‘(𝑥 ∖ {𝑋})) ∈ ℂ)
102		ax-1cn 10597	. . . . . . . . . . . . . 14 ⊢ 1 ∈ ℂ
103		pncan 10894	. . . . . . . . . . . . . 14 ⊢ (((♯‘(𝑥 ∖ {𝑋})) ∈ ℂ ∧ 1 ∈ ℂ) → (((♯‘(𝑥 ∖ {𝑋})) + 1) − 1) = (♯‘(𝑥 ∖ {𝑋})))
104	101, 102, 103	sylancl 588	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (((♯‘(𝑥 ∖ {𝑋})) + 1) − 1) = (♯‘(𝑥 ∖ {𝑋})))
105		neldifsnd 4728	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → ¬ 𝑋 ∈ (𝑥 ∖ {𝑋}))
106		hashunsng 13756	. . . . . . . . . . . . . . . . 17 ⊢ (𝑋 ∈ 𝑆 → (((𝑥 ∖ {𝑋}) ∈ Fin ∧ ¬ 𝑋 ∈ (𝑥 ∖ {𝑋})) → (♯‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = ((♯‘(𝑥 ∖ {𝑋})) + 1)))
107	63, 6, 106	3syl 18	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (((𝑥 ∖ {𝑋}) ∈ Fin ∧ ¬ 𝑋 ∈ (𝑥 ∖ {𝑋})) → (♯‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = ((♯‘(𝑥 ∖ {𝑋})) + 1)))
108	98, 105, 107	mp2and 697	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (♯‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = ((♯‘(𝑥 ∖ {𝑋})) + 1))
109		undif1 4426	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 ∖ {𝑋}) ∪ {𝑋}) = (𝑥 ∪ {𝑋})
110		simpr 487	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → ¬ 𝑥 ∈ 𝒫 𝑉)
111	61, 110	eldifd 3949	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ (𝒫 (𝑉 ∪ {𝑋}) ∖ 𝒫 𝑉))
112		elpwunsn 4623	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 ∈ (𝒫 (𝑉 ∪ {𝑋}) ∖ 𝒫 𝑉) → 𝑋 ∈ 𝑥)
113	111, 112	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑋 ∈ 𝑥)
114	113	snssd 4744	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → {𝑋} ⊆ 𝑥)
115		ssequn2 4161	. . . . . . . . . . . . . . . . . . 19 ⊢ ({𝑋} ⊆ 𝑥 ↔ (𝑥 ∪ {𝑋}) = 𝑥)
116	114, 115	sylib 220	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∪ {𝑋}) = 𝑥)
117	109, 116	syl5req 2871	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 = ((𝑥 ∖ {𝑋}) ∪ {𝑋}))
118	117	fveq2d 6676	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (♯‘𝑥) = (♯‘((𝑥 ∖ {𝑋}) ∪ {𝑋})))
119	118, 69	eqtr3d 2860	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (♯‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = 𝑀)
120	108, 119	eqtr3d 2860	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → ((♯‘(𝑥 ∖ {𝑋})) + 1) = 𝑀)
121	120	oveq1d 7173	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (((♯‘(𝑥 ∖ {𝑋})) + 1) − 1) = (𝑀 − 1))
122	104, 121	eqtr3d 2860	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (♯‘(𝑥 ∖ {𝑋})) = (𝑀 − 1))
123	85, 94, 122	elrabd 3684	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ∈ {𝑢 ∈ 𝒫 𝑊 ∣ (♯‘𝑢) = (𝑀 − 1)})
124	84, 123	sseldd 3970	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ∈ (◡𝐻 “ {𝐷}))
125		ramub1.h	. . . . . . . . . . . 12 ⊢ 𝐻 = (𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ↦ (𝐾‘(𝑢 ∪ {𝑋})))
126	125	mptiniseg 6095	. . . . . . . . . . 11 ⊢ (𝐷 ∈ 𝑅 → (◡𝐻 “ {𝐷}) = {𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ∣ (𝐾‘(𝑢 ∪ {𝑋})) = 𝐷})
127	63, 17, 126	3syl 18	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (◡𝐻 “ {𝐷}) = {𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ∣ (𝐾‘(𝑢 ∪ {𝑋})) = 𝐷})
128	124, 127	eleqtrd 2917	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∖ {𝑋}) ∈ {𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ∣ (𝐾‘(𝑢 ∪ {𝑋})) = 𝐷})
129		uneq1 4134	. . . . . . . . . . . 12 ⊢ (𝑢 = (𝑥 ∖ {𝑋}) → (𝑢 ∪ {𝑋}) = ((𝑥 ∖ {𝑋}) ∪ {𝑋}))
130	129	fveqeq2d 6680	. . . . . . . . . . 11 ⊢ (𝑢 = (𝑥 ∖ {𝑋}) → ((𝐾‘(𝑢 ∪ {𝑋})) = 𝐷 ↔ (𝐾‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = 𝐷))
131	130	elrab 3682	. . . . . . . . . 10 ⊢ ((𝑥 ∖ {𝑋}) ∈ {𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ∣ (𝐾‘(𝑢 ∪ {𝑋})) = 𝐷} ↔ ((𝑥 ∖ {𝑋}) ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ∧ (𝐾‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = 𝐷))
132	131	simprbi 499	. . . . . . . . 9 ⊢ ((𝑥 ∖ {𝑋}) ∈ {𝑢 ∈ ((𝑆 ∖ {𝑋})𝐶(𝑀 − 1)) ∣ (𝐾‘(𝑢 ∪ {𝑋})) = 𝐷} → (𝐾‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = 𝐷)
133	128, 132	syl 17	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝐾‘((𝑥 ∖ {𝑋}) ∪ {𝑋})) = 𝐷)
134	117	fveq2d 6676	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝐾‘𝑥) = (𝐾‘((𝑥 ∖ {𝑋}) ∪ {𝑋})))
135		simpl1r 1221	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝐸 = 𝐷)
136	133, 134, 135	3eqtr4d 2868	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝐾‘𝑥) = 𝐸)
137		ramub1.6	. . . . . . . . 9 ⊢ (𝜑 → 𝐾:(𝑆𝐶𝑀)⟶𝑅)
138	137	ffnd 6517	. . . . . . . 8 ⊢ (𝜑 → 𝐾 Fn (𝑆𝐶𝑀))
139		fniniseg 6832	. . . . . . . 8 ⊢ (𝐾 Fn (𝑆𝐶𝑀) → (𝑥 ∈ (◡𝐾 “ {𝐸}) ↔ (𝑥 ∈ (𝑆𝐶𝑀) ∧ (𝐾‘𝑥) = 𝐸)))
140	63, 138, 139	3syl 18	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → (𝑥 ∈ (◡𝐾 “ {𝐸}) ↔ (𝑥 ∈ (𝑆𝐶𝑀) ∧ (𝐾‘𝑥) = 𝐸)))
141	75, 136, 140	mpbir2and 711	. . . . . 6 ⊢ ((((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) ∧ ¬ 𝑥 ∈ 𝒫 𝑉) → 𝑥 ∈ (◡𝐾 “ {𝐸}))
142	60, 141	pm2.61dan 811	. . . . 5 ⊢ (((𝜑 ∧ 𝐸 = 𝐷) ∧ 𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∧ (♯‘𝑥) = 𝑀) → 𝑥 ∈ (◡𝐾 “ {𝐸}))
143	142	rabssdv 4053	. . . 4 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → {𝑥 ∈ 𝒫 (𝑉 ∪ {𝑋}) ∣ (♯‘𝑥) = 𝑀} ⊆ (◡𝐾 “ {𝐸}))
144	49, 143	eqsstrd 4007	. . 3 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → ((𝑉 ∪ {𝑋})𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))
145		fveq2 6672	. . . . . 6 ⊢ (𝑧 = (𝑉 ∪ {𝑋}) → (♯‘𝑧) = (♯‘(𝑉 ∪ {𝑋})))
146	145	breq2d 5080	. . . . 5 ⊢ (𝑧 = (𝑉 ∪ {𝑋}) → ((𝐹‘𝐸) ≤ (♯‘𝑧) ↔ (𝐹‘𝐸) ≤ (♯‘(𝑉 ∪ {𝑋}))))
147		oveq1 7165	. . . . . 6 ⊢ (𝑧 = (𝑉 ∪ {𝑋}) → (𝑧𝐶𝑀) = ((𝑉 ∪ {𝑋})𝐶𝑀))
148	147	sseq1d 4000	. . . . 5 ⊢ (𝑧 = (𝑉 ∪ {𝑋}) → ((𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}) ↔ ((𝑉 ∪ {𝑋})𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))
149	146, 148	anbi12d 632	. . . 4 ⊢ (𝑧 = (𝑉 ∪ {𝑋}) → (((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})) ↔ ((𝐹‘𝐸) ≤ (♯‘(𝑉 ∪ {𝑋})) ∧ ((𝑉 ∪ {𝑋})𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))))
150	149	rspcev 3625	. . 3 ⊢ (((𝑉 ∪ {𝑋}) ∈ 𝒫 𝑆 ∧ ((𝐹‘𝐸) ≤ (♯‘(𝑉 ∪ {𝑋})) ∧ ((𝑉 ∪ {𝑋})𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))) → ∃𝑧 ∈ 𝒫 𝑆((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))
151	10, 40, 144, 150	syl12anc 834	. 2 ⊢ ((𝜑 ∧ 𝐸 = 𝐷) → ∃𝑧 ∈ 𝒫 𝑆((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))
152	1, 5	sselpwd 5232	. . . 4 ⊢ (𝜑 → 𝑉 ∈ 𝒫 𝑆)
153	152	adantr 483	. . 3 ⊢ ((𝜑 ∧ 𝐸 ≠ 𝐷) → 𝑉 ∈ 𝒫 𝑆)
154		ifnefalse 4481	. . . . 5 ⊢ (𝐸 ≠ 𝐷 → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) = (𝐹‘𝐸))
155	154	adantl 484	. . . 4 ⊢ ((𝜑 ∧ 𝐸 ≠ 𝐷) → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) = (𝐹‘𝐸))
156	13	adantr 483	. . . 4 ⊢ ((𝜑 ∧ 𝐸 ≠ 𝐷) → if(𝐸 = 𝐷, ((𝐹‘𝐷) − 1), (𝐹‘𝐸)) ≤ (♯‘𝑉))
157	155, 156	eqbrtrrd 5092	. . 3 ⊢ ((𝜑 ∧ 𝐸 ≠ 𝐷) → (𝐹‘𝐸) ≤ (♯‘𝑉))
158	53	adantr 483	. . 3 ⊢ ((𝜑 ∧ 𝐸 ≠ 𝐷) → (𝑉𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))
159		fveq2 6672	. . . . . 6 ⊢ (𝑧 = 𝑉 → (♯‘𝑧) = (♯‘𝑉))
160	159	breq2d 5080	. . . . 5 ⊢ (𝑧 = 𝑉 → ((𝐹‘𝐸) ≤ (♯‘𝑧) ↔ (𝐹‘𝐸) ≤ (♯‘𝑉)))
161		oveq1 7165	. . . . . 6 ⊢ (𝑧 = 𝑉 → (𝑧𝐶𝑀) = (𝑉𝐶𝑀))
162	161	sseq1d 4000	. . . . 5 ⊢ (𝑧 = 𝑉 → ((𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}) ↔ (𝑉𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))
163	160, 162	anbi12d 632	. . . 4 ⊢ (𝑧 = 𝑉 → (((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})) ↔ ((𝐹‘𝐸) ≤ (♯‘𝑉) ∧ (𝑉𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))))
164	163	rspcev 3625	. . 3 ⊢ ((𝑉 ∈ 𝒫 𝑆 ∧ ((𝐹‘𝐸) ≤ (♯‘𝑉) ∧ (𝑉𝐶𝑀) ⊆ (◡𝐾 “ {𝐸}))) → ∃𝑧 ∈ 𝒫 𝑆((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))
165	153, 157, 158, 164	syl12anc 834	. 2 ⊢ ((𝜑 ∧ 𝐸 ≠ 𝐷) → ∃𝑧 ∈ 𝒫 𝑆((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))
166	151, 165	pm2.61dane 3106	1 ⊢ (𝜑 → ∃𝑧 ∈ 𝒫 𝑆((𝐹‘𝐸) ≤ (♯‘𝑧) ∧ (𝑧𝐶𝑀) ⊆ (◡𝐾 “ {𝐸})))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 208   ∧ wa 398   ∧ w3a 1083   = wceq 1537   ∈ wcel 2114   ≠ wne 3018  ∃wrex 3141  {crab 3144  Vcvv 3496   ∖ cdif 3935   ∪ cun 3936   ⊆ wss 3938  ifcif 4469  𝒫 cpw 4541  {csn 4569   class class class wbr 5068   ↦ cmpt 5148  ^◡ccnv 5556   “ cima 5560   Fn wfn 6352  ⟶wf 6353  ‘cfv 6357  (class class class)co 7158   ∈ cmpo 7160  Fincfn 8511  ℂcc 10537  ℝcr 10538  1c1 10540   + caddc 10542   ≤ cle 10678   − cmin 10872  ℕcn 11640  ℕ₀cn0 11900  ♯chash 13693   Ramsey cram 16337

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2795  ax-rep 5192  ax-sep 5205  ax-nul 5212  ax-pow 5268  ax-pr 5332  ax-un 7463  ax-cnex 10595  ax-resscn 10596  ax-1cn 10597  ax-icn 10598  ax-addcl 10599  ax-addrcl 10600  ax-mulcl 10601  ax-mulrcl 10602  ax-mulcom 10603  ax-addass 10604  ax-mulass 10605  ax-distr 10606  ax-i2m1 10607  ax-1ne0 10608  ax-1rid 10609  ax-rnegex 10610  ax-rrecex 10611  ax-cnre 10612  ax-pre-lttri 10613  ax-pre-lttrn 10614  ax-pre-ltadd 10615  ax-pre-mulgt0 10616

This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2802  df-cleq 2816  df-clel 2895  df-nfc 2965  df-ne 3019  df-nel 3126  df-ral 3145  df-rex 3146  df-reu 3147  df-rmo 3148  df-rab 3149  df-v 3498  df-sbc 3775  df-csb 3886  df-dif 3941  df-un 3943  df-in 3945  df-ss 3954  df-pss 3956  df-nul 4294  df-if 4470  df-pw 4543  df-sn 4570  df-pr 4572  df-tp 4574  df-op 4576  df-uni 4841  df-int 4879  df-iun 4923  df-br 5069  df-opab 5131  df-mpt 5149  df-tr 5175  df-id 5462  df-eprel 5467  df-po 5476  df-so 5477  df-fr 5516  df-we 5518  df-xp 5563  df-rel 5564  df-cnv 5565  df-co 5566  df-dm 5567  df-rn 5568  df-res 5569  df-ima 5570  df-pred 6150  df-ord 6196  df-on 6197  df-lim 6198  df-suc 6199  df-iota 6316  df-fun 6359  df-fn 6360  df-f 6361  df-f1 6362  df-fo 6363  df-f1o 6364  df-fv 6365  df-riota 7116  df-ov 7161  df-oprab 7162  df-mpo 7163  df-om 7583  df-1st 7691  df-2nd 7692  df-wrecs 7949  df-recs 8010  df-rdg 8048  df-1o 8104  df-oadd 8108  df-er 8291  df-en 8512  df-dom 8513  df-sdom 8514  df-fin 8515  df-dju 9332  df-card 9370  df-pnf 10679  df-mnf 10680  df-xr 10681  df-ltxr 10682  df-le 10683  df-sub 10874  df-neg 10875  df-nn 11641  df-n0 11901  df-z 11985  df-uz 12247  df-fz 12896  df-hash 13694

This theorem is referenced by:  ramub1lem2  16365