Users' Mathboxes Mathbox for Glauco Siliprandi < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  nnfoctbdjlem Structured version   Visualization version   GIF version

Theorem nnfoctbdjlem 45158
Description: There exists a mapping from onto any (nonempty) countable set of disjoint sets, such that elements in the range of the map are disjoint. (Contributed by Glauco Siliprandi, 17-Aug-2020.)
Hypotheses
Ref Expression
nnfoctbdjlem.a (𝜑𝐴 ⊆ ℕ)
nnfoctbdjlem.g (𝜑𝐺:𝐴1-1-onto𝑋)
nnfoctbdjlem.dj (𝜑Disj 𝑦𝑋 𝑦)
nnfoctbdjlem.f 𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
Assertion
Ref Expression
nnfoctbdjlem (𝜑 → ∃𝑓(𝑓:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑓𝑛)))
Distinct variable groups:   𝐴,𝑛,𝑦   𝑓,𝐹,𝑛   𝑦,𝐹   𝑛,𝐺,𝑦   𝑓,𝑋,𝑛   𝑦,𝑋   𝜑,𝑛,𝑦
Allowed substitution hints:   𝜑(𝑓)   𝐴(𝑓)   𝐺(𝑓)

Proof of Theorem nnfoctbdjlem
Dummy variables 𝑘 𝑥 𝑚 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 iftrue 4534 . . . . . . . 8 ((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = ∅)
21adantl 483 . . . . . . 7 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = ∅)
3 0ex 5307 . . . . . . . . 9 ∅ ∈ V
43snid 4664 . . . . . . . 8 ∅ ∈ {∅}
5 elun2 4177 . . . . . . . 8 (∅ ∈ {∅} → ∅ ∈ (𝑋 ∪ {∅}))
64, 5ax-mp 5 . . . . . . 7 ∅ ∈ (𝑋 ∪ {∅})
72, 6eqeltrdi 2842 . . . . . 6 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
87adantll 713 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
9 iffalse 4537 . . . . . . 7 (¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑛 − 1)))
109adantl 483 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑛 − 1)))
11 nnfoctbdjlem.g . . . . . . . . . . 11 (𝜑𝐺:𝐴1-1-onto𝑋)
12 f1of 6831 . . . . . . . . . . 11 (𝐺:𝐴1-1-onto𝑋𝐺:𝐴𝑋)
1311, 12syl 17 . . . . . . . . . 10 (𝜑𝐺:𝐴𝑋)
1413adantr 482 . . . . . . . . 9 ((𝜑 ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → 𝐺:𝐴𝑋)
15 pm2.46 882 . . . . . . . . . . 11 (¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → ¬ ¬ (𝑛 − 1) ∈ 𝐴)
1615notnotrd 133 . . . . . . . . . 10 (¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → (𝑛 − 1) ∈ 𝐴)
1716adantl 483 . . . . . . . . 9 ((𝜑 ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝑛 − 1) ∈ 𝐴)
1814, 17ffvelcdmd 7085 . . . . . . . 8 ((𝜑 ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ 𝑋)
1918adantlr 714 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ 𝑋)
20 elun1 4176 . . . . . . 7 ((𝐺‘(𝑛 − 1)) ∈ 𝑋 → (𝐺‘(𝑛 − 1)) ∈ (𝑋 ∪ {∅}))
2119, 20syl 17 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ (𝑋 ∪ {∅}))
2210, 21eqeltrd 2834 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
238, 22pm2.61dan 812 . . . 4 ((𝜑𝑛 ∈ ℕ) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
24 nnfoctbdjlem.f . . . 4 𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
2523, 24fmptd 7111 . . 3 (𝜑𝐹:ℕ⟶(𝑋 ∪ {∅}))
26 simpr 486 . . . . . . . . . 10 ((𝜑𝑦𝑋) → 𝑦𝑋)
27 f1ofo 6838 . . . . . . . . . . . . 13 (𝐺:𝐴1-1-onto𝑋𝐺:𝐴onto𝑋)
28 forn 6806 . . . . . . . . . . . . 13 (𝐺:𝐴onto𝑋 → ran 𝐺 = 𝑋)
2911, 27, 283syl 18 . . . . . . . . . . . 12 (𝜑 → ran 𝐺 = 𝑋)
3029eqcomd 2739 . . . . . . . . . . 11 (𝜑𝑋 = ran 𝐺)
3130adantr 482 . . . . . . . . . 10 ((𝜑𝑦𝑋) → 𝑋 = ran 𝐺)
3226, 31eleqtrd 2836 . . . . . . . . 9 ((𝜑𝑦𝑋) → 𝑦 ∈ ran 𝐺)
3313ffnd 6716 . . . . . . . . . . 11 (𝜑𝐺 Fn 𝐴)
34 fvelrnb 6950 . . . . . . . . . . 11 (𝐺 Fn 𝐴 → (𝑦 ∈ ran 𝐺 ↔ ∃𝑘𝐴 (𝐺𝑘) = 𝑦))
3533, 34syl 17 . . . . . . . . . 10 (𝜑 → (𝑦 ∈ ran 𝐺 ↔ ∃𝑘𝐴 (𝐺𝑘) = 𝑦))
3635adantr 482 . . . . . . . . 9 ((𝜑𝑦𝑋) → (𝑦 ∈ ran 𝐺 ↔ ∃𝑘𝐴 (𝐺𝑘) = 𝑦))
3732, 36mpbid 231 . . . . . . . 8 ((𝜑𝑦𝑋) → ∃𝑘𝐴 (𝐺𝑘) = 𝑦)
38 nnfoctbdjlem.a . . . . . . . . . . . . . . 15 (𝜑𝐴 ⊆ ℕ)
3938sselda 3982 . . . . . . . . . . . . . 14 ((𝜑𝑘𝐴) → 𝑘 ∈ ℕ)
4039peano2nnd 12226 . . . . . . . . . . . . 13 ((𝜑𝑘𝐴) → (𝑘 + 1) ∈ ℕ)
41403adant3 1133 . . . . . . . . . . . 12 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝑘 + 1) ∈ ℕ)
4224a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑘𝐴) → 𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))))
43 1red 11212 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 1 ∈ ℝ)
44 1red 11212 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑘𝐴) → 1 ∈ ℝ)
4539nnrpd 13011 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑘𝐴) → 𝑘 ∈ ℝ+)
4644, 45ltaddrp2d 13047 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘𝐴) → 1 < (𝑘 + 1))
4746adantr 482 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 1 < (𝑘 + 1))
48 id 22 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = (𝑘 + 1) → 𝑛 = (𝑘 + 1))
4948eqcomd 2739 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = (𝑘 + 1) → (𝑘 + 1) = 𝑛)
5049adantl 483 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝑘 + 1) = 𝑛)
5147, 50breqtrd 5174 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 1 < 𝑛)
5243, 51gtned 11346 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 𝑛 ≠ 1)
5352neneqd 2946 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → ¬ 𝑛 = 1)
54 oveq1 7413 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = (𝑘 + 1) → (𝑛 − 1) = ((𝑘 + 1) − 1))
5539nncnd 12225 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘𝐴) → 𝑘 ∈ ℂ)
56 1cnd 11206 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘𝐴) → 1 ∈ ℂ)
5755, 56pncand 11569 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑘𝐴) → ((𝑘 + 1) − 1) = 𝑘)
5854, 57sylan9eqr 2795 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝑛 − 1) = 𝑘)
59 simplr 768 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 𝑘𝐴)
6058, 59eqeltrd 2834 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝑛 − 1) ∈ 𝐴)
6160notnotd 144 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → ¬ ¬ (𝑛 − 1) ∈ 𝐴)
62 ioran 983 . . . . . . . . . . . . . . . . . 18 (¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ↔ (¬ 𝑛 = 1 ∧ ¬ ¬ (𝑛 − 1) ∈ 𝐴))
6353, 61, 62sylanbrc 584 . . . . . . . . . . . . . . . . 17 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴))
6463iffalsed 4539 . . . . . . . . . . . . . . . 16 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑛 − 1)))
6558fveq2d 6893 . . . . . . . . . . . . . . . 16 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝐺‘(𝑛 − 1)) = (𝐺𝑘))
6664, 65eqtrd 2773 . . . . . . . . . . . . . . 15 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺𝑘))
6713ffvelcdmda 7084 . . . . . . . . . . . . . . 15 ((𝜑𝑘𝐴) → (𝐺𝑘) ∈ 𝑋)
6842, 66, 40, 67fvmptd 7003 . . . . . . . . . . . . . 14 ((𝜑𝑘𝐴) → (𝐹‘(𝑘 + 1)) = (𝐺𝑘))
69683adant3 1133 . . . . . . . . . . . . 13 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝐹‘(𝑘 + 1)) = (𝐺𝑘))
70 simp3 1139 . . . . . . . . . . . . 13 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝐺𝑘) = 𝑦)
7169, 70eqtrd 2773 . . . . . . . . . . . 12 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝐹‘(𝑘 + 1)) = 𝑦)
72 fveq2 6889 . . . . . . . . . . . . . 14 (𝑚 = (𝑘 + 1) → (𝐹𝑚) = (𝐹‘(𝑘 + 1)))
7372eqeq1d 2735 . . . . . . . . . . . . 13 (𝑚 = (𝑘 + 1) → ((𝐹𝑚) = 𝑦 ↔ (𝐹‘(𝑘 + 1)) = 𝑦))
7473rspcev 3613 . . . . . . . . . . . 12 (((𝑘 + 1) ∈ ℕ ∧ (𝐹‘(𝑘 + 1)) = 𝑦) → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)
7541, 71, 74syl2anc 585 . . . . . . . . . . 11 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)
76753exp 1120 . . . . . . . . . 10 (𝜑 → (𝑘𝐴 → ((𝐺𝑘) = 𝑦 → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)))
7776adantr 482 . . . . . . . . 9 ((𝜑𝑦𝑋) → (𝑘𝐴 → ((𝐺𝑘) = 𝑦 → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)))
7877rexlimdv 3154 . . . . . . . 8 ((𝜑𝑦𝑋) → (∃𝑘𝐴 (𝐺𝑘) = 𝑦 → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦))
7937, 78mpd 15 . . . . . . 7 ((𝜑𝑦𝑋) → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)
80 id 22 . . . . . . . . . 10 ((𝐹𝑚) = 𝑦 → (𝐹𝑚) = 𝑦)
8180eqcomd 2739 . . . . . . . . 9 ((𝐹𝑚) = 𝑦𝑦 = (𝐹𝑚))
8281a1i 11 . . . . . . . 8 (((𝜑𝑦𝑋) ∧ 𝑚 ∈ ℕ) → ((𝐹𝑚) = 𝑦𝑦 = (𝐹𝑚)))
8382reximdva 3169 . . . . . . 7 ((𝜑𝑦𝑋) → (∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦 → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚)))
8479, 83mpd 15 . . . . . 6 ((𝜑𝑦𝑋) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
8584adantlr 714 . . . . 5 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ 𝑦𝑋) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
86 simpll 766 . . . . . 6 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ ¬ 𝑦𝑋) → 𝜑)
87 elunnel1 4149 . . . . . . . 8 ((𝑦 ∈ (𝑋 ∪ {∅}) ∧ ¬ 𝑦𝑋) → 𝑦 ∈ {∅})
88 elsni 4645 . . . . . . . 8 (𝑦 ∈ {∅} → 𝑦 = ∅)
8987, 88syl 17 . . . . . . 7 ((𝑦 ∈ (𝑋 ∪ {∅}) ∧ ¬ 𝑦𝑋) → 𝑦 = ∅)
9089adantll 713 . . . . . 6 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ ¬ 𝑦𝑋) → 𝑦 = ∅)
91 1nn 12220 . . . . . . . 8 1 ∈ ℕ
9291a1i 11 . . . . . . 7 ((𝜑𝑦 = ∅) → 1 ∈ ℕ)
931orcs 874 . . . . . . . . . 10 (𝑛 = 1 → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = ∅)
9491a1i 11 . . . . . . . . . 10 (𝜑 → 1 ∈ ℕ)
953a1i 11 . . . . . . . . . 10 (𝜑 → ∅ ∈ V)
9624, 93, 94, 95fvmptd3 7019 . . . . . . . . 9 (𝜑 → (𝐹‘1) = ∅)
9796adantr 482 . . . . . . . 8 ((𝜑𝑦 = ∅) → (𝐹‘1) = ∅)
98 id 22 . . . . . . . . . 10 (𝑦 = ∅ → 𝑦 = ∅)
9998eqcomd 2739 . . . . . . . . 9 (𝑦 = ∅ → ∅ = 𝑦)
10099adantl 483 . . . . . . . 8 ((𝜑𝑦 = ∅) → ∅ = 𝑦)
10197, 100eqtr2d 2774 . . . . . . 7 ((𝜑𝑦 = ∅) → 𝑦 = (𝐹‘1))
102 fveq2 6889 . . . . . . . 8 (𝑚 = 1 → (𝐹𝑚) = (𝐹‘1))
103102rspceeqv 3633 . . . . . . 7 ((1 ∈ ℕ ∧ 𝑦 = (𝐹‘1)) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
10492, 101, 103syl2anc 585 . . . . . 6 ((𝜑𝑦 = ∅) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
10586, 90, 104syl2anc 585 . . . . 5 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ ¬ 𝑦𝑋) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
10685, 105pm2.61dan 812 . . . 4 ((𝜑𝑦 ∈ (𝑋 ∪ {∅})) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
107106ralrimiva 3147 . . 3 (𝜑 → ∀𝑦 ∈ (𝑋 ∪ {∅})∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
108 dffo3 7101 . . 3 (𝐹:ℕ–onto→(𝑋 ∪ {∅}) ↔ (𝐹:ℕ⟶(𝑋 ∪ {∅}) ∧ ∀𝑦 ∈ (𝑋 ∪ {∅})∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚)))
10925, 107, 108sylanbrc 584 . 2 (𝜑𝐹:ℕ–onto→(𝑋 ∪ {∅}))
110 animorrl 980 . . . . 5 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛 = 𝑚) → (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
1112, 3eqeltrdi 2842 . . . . . . . . . . . . 13 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ V)
11224fvmpt2 7007 . . . . . . . . . . . . 13 ((𝑛 ∈ ℕ ∧ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ V) → (𝐹𝑛) = if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
113111, 112syldan 592 . . . . . . . . . . . 12 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
114113, 2eqtrd 2773 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = ∅)
115114ineq1d 4211 . . . . . . . . . 10 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = (∅ ∩ (𝐹𝑚)))
116 0in 4393 . . . . . . . . . 10 (∅ ∩ (𝐹𝑚)) = ∅
117115, 116eqtrdi 2789 . . . . . . . . 9 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
118117adantlr 714 . . . . . . . 8 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
119118ad4ant24 753 . . . . . . 7 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
120 eqeq1 2737 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑚 → (𝑛 = 1 ↔ 𝑚 = 1))
121 oveq1 7413 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑚 → (𝑛 − 1) = (𝑚 − 1))
122121eleq1d 2819 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑚 → ((𝑛 − 1) ∈ 𝐴 ↔ (𝑚 − 1) ∈ 𝐴))
123122notbid 318 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑚 → (¬ (𝑛 − 1) ∈ 𝐴 ↔ ¬ (𝑚 − 1) ∈ 𝐴))
124120, 123orbi12d 918 . . . . . . . . . . . . . . 15 (𝑛 = 𝑚 → ((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ↔ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)))
125121fveq2d 6893 . . . . . . . . . . . . . . 15 (𝑛 = 𝑚 → (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)))
126124, 125ifbieq2d 4554 . . . . . . . . . . . . . 14 (𝑛 = 𝑚 → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))))
127 simpl 484 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → 𝑚 ∈ ℕ)
128 iftrue 4534 . . . . . . . . . . . . . . . 16 ((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = ∅)
129128, 3eqeltrdi 2842 . . . . . . . . . . . . . . 15 ((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) ∈ V)
130129adantl 483 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) ∈ V)
13124, 126, 127, 130fvmptd3 7019 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))))
132128adantl 483 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = ∅)
133131, 132eqtrd 2773 . . . . . . . . . . . 12 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = ∅)
134133ineq2d 4212 . . . . . . . . . . 11 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ((𝐹𝑛) ∩ ∅))
135 in0 4391 . . . . . . . . . . 11 ((𝐹𝑛) ∩ ∅) = ∅
136134, 135eqtrdi 2789 . . . . . . . . . 10 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
137136adantll 713 . . . . . . . . 9 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
138137ad5ant25 761 . . . . . . . 8 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
139 fvex 6902 . . . . . . . . . . . . . . . 16 (𝐺‘(𝑛 − 1)) ∈ V
1403, 139ifex 4578 . . . . . . . . . . . . . . 15 if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ V
141140, 112mpan2 690 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝐹𝑛) = if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
142141, 9sylan9eq 2793 . . . . . . . . . . . . 13 ((𝑛 ∈ ℕ ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = (𝐺‘(𝑛 − 1)))
143142adantlr 714 . . . . . . . . . . . 12 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = (𝐺‘(𝑛 − 1)))
1441433adant3 1133 . . . . . . . . . . 11 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑛) = (𝐺‘(𝑛 − 1)))
14524a1i 11 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → 𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))))
146126adantl 483 . . . . . . . . . . . . . . 15 (((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) ∧ 𝑛 = 𝑚) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))))
147 iffalse 4537 . . . . . . . . . . . . . . . 16 (¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = (𝐺‘(𝑚 − 1)))
148147ad2antlr 726 . . . . . . . . . . . . . . 15 (((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) ∧ 𝑛 = 𝑚) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = (𝐺‘(𝑚 − 1)))
149146, 148eqtrd 2773 . . . . . . . . . . . . . 14 (((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) ∧ 𝑛 = 𝑚) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑚 − 1)))
150 simpl 484 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → 𝑚 ∈ ℕ)
151 fvexd 6904 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑚 − 1)) ∈ V)
152145, 149, 150, 151fvmptd 7003 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = (𝐺‘(𝑚 − 1)))
153152adantll 713 . . . . . . . . . . . 12 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = (𝐺‘(𝑚 − 1)))
1541533adant2 1132 . . . . . . . . . . 11 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = (𝐺‘(𝑚 − 1)))
155144, 154ineq12d 4213 . . . . . . . . . 10 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))))
156155ad5ant245 1362 . . . . . . . . 9 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))))
15716ad2antlr 726 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝑛 − 1) ∈ 𝐴)
158 pm2.46 882 . . . . . . . . . . . . . . 15 (¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → ¬ ¬ (𝑚 − 1) ∈ 𝐴)
159158notnotrd 133 . . . . . . . . . . . . . 14 (¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → (𝑚 − 1) ∈ 𝐴)
160159adantl 483 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝑚 − 1) ∈ 𝐴)
161 f1of1 6830 . . . . . . . . . . . . . . . . . 18 (𝐺:𝐴1-1-onto𝑋𝐺:𝐴1-1𝑋)
16211, 161syl 17 . . . . . . . . . . . . . . . . 17 (𝜑𝐺:𝐴1-1𝑋)
163 dff14a 7266 . . . . . . . . . . . . . . . . 17 (𝐺:𝐴1-1𝑋 ↔ (𝐺:𝐴𝑋 ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))))
164162, 163sylib 217 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐺:𝐴𝑋 ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))))
165164simprd 497 . . . . . . . . . . . . . . 15 (𝜑 → ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)))
166165adantr 482 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) → ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)))
167166ad3antrrr 729 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)))
168157, 160, 167jca31 516 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (((𝑛 − 1) ∈ 𝐴 ∧ (𝑚 − 1) ∈ 𝐴) ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))))
169 nncn 12217 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
170169adantr 482 . . . . . . . . . . . . . . 15 ((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) → 𝑛 ∈ ℂ)
171170ad2antlr 726 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 𝑛 ∈ ℂ)
172 nncn 12217 . . . . . . . . . . . . . . . 16 (𝑚 ∈ ℕ → 𝑚 ∈ ℂ)
173172adantl 483 . . . . . . . . . . . . . . 15 ((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℂ)
174173ad2antlr 726 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 𝑚 ∈ ℂ)
175 1cnd 11206 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 1 ∈ ℂ)
176 simpr 486 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 𝑛𝑚)
177171, 174, 175, 176subneintr2d 11614 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → (𝑛 − 1) ≠ (𝑚 − 1))
178177ad2antrr 725 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝑛 − 1) ≠ (𝑚 − 1))
179 neeq1 3004 . . . . . . . . . . . . . 14 (𝑥 = (𝑛 − 1) → (𝑥𝑦 ↔ (𝑛 − 1) ≠ 𝑦))
180 fveq2 6889 . . . . . . . . . . . . . . 15 (𝑥 = (𝑛 − 1) → (𝐺𝑥) = (𝐺‘(𝑛 − 1)))
181180neeq1d 3001 . . . . . . . . . . . . . 14 (𝑥 = (𝑛 − 1) → ((𝐺𝑥) ≠ (𝐺𝑦) ↔ (𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦)))
182179, 181imbi12d 345 . . . . . . . . . . . . 13 (𝑥 = (𝑛 − 1) → ((𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)) ↔ ((𝑛 − 1) ≠ 𝑦 → (𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦))))
183 neeq2 3005 . . . . . . . . . . . . . 14 (𝑦 = (𝑚 − 1) → ((𝑛 − 1) ≠ 𝑦 ↔ (𝑛 − 1) ≠ (𝑚 − 1)))
184 fveq2 6889 . . . . . . . . . . . . . . 15 (𝑦 = (𝑚 − 1) → (𝐺𝑦) = (𝐺‘(𝑚 − 1)))
185184neeq2d 3002 . . . . . . . . . . . . . 14 (𝑦 = (𝑚 − 1) → ((𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦) ↔ (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1))))
186183, 185imbi12d 345 . . . . . . . . . . . . 13 (𝑦 = (𝑚 − 1) → (((𝑛 − 1) ≠ 𝑦 → (𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦)) ↔ ((𝑛 − 1) ≠ (𝑚 − 1) → (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1)))))
187182, 186rspc2va 3623 . . . . . . . . . . . 12 ((((𝑛 − 1) ∈ 𝐴 ∧ (𝑚 − 1) ∈ 𝐴) ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))) → ((𝑛 − 1) ≠ (𝑚 − 1) → (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1))))
188168, 178, 187sylc 65 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1)))
189188neneqd 2946 . . . . . . . . . 10 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ¬ (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)))
19018ad4ant13 750 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ 𝑋)
19113ffvelcdmda 7084 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑚 − 1) ∈ 𝐴) → (𝐺‘(𝑚 − 1)) ∈ 𝑋)
192159, 191sylan2 594 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑚 − 1)) ∈ 𝑋)
193192ad4ant14 751 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑚 − 1)) ∈ 𝑋)
194 nnfoctbdjlem.dj . . . . . . . . . . . . . 14 (𝜑Disj 𝑦𝑋 𝑦)
195 id 22 . . . . . . . . . . . . . . 15 (𝑦 = 𝑧𝑦 = 𝑧)
196195disjor 5128 . . . . . . . . . . . . . 14 (Disj 𝑦𝑋 𝑦 ↔ ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅))
197194, 196sylib 217 . . . . . . . . . . . . 13 (𝜑 → ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅))
198197ad3antrrr 729 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅))
199 eqeq1 2737 . . . . . . . . . . . . . 14 (𝑦 = (𝐺‘(𝑛 − 1)) → (𝑦 = 𝑧 ↔ (𝐺‘(𝑛 − 1)) = 𝑧))
200 ineq1 4205 . . . . . . . . . . . . . . 15 (𝑦 = (𝐺‘(𝑛 − 1)) → (𝑦𝑧) = ((𝐺‘(𝑛 − 1)) ∩ 𝑧))
201200eqeq1d 2735 . . . . . . . . . . . . . 14 (𝑦 = (𝐺‘(𝑛 − 1)) → ((𝑦𝑧) = ∅ ↔ ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅))
202199, 201orbi12d 918 . . . . . . . . . . . . 13 (𝑦 = (𝐺‘(𝑛 − 1)) → ((𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅) ↔ ((𝐺‘(𝑛 − 1)) = 𝑧 ∨ ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅)))
203 eqeq2 2745 . . . . . . . . . . . . . 14 (𝑧 = (𝐺‘(𝑚 − 1)) → ((𝐺‘(𝑛 − 1)) = 𝑧 ↔ (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1))))
204 ineq2 4206 . . . . . . . . . . . . . . 15 (𝑧 = (𝐺‘(𝑚 − 1)) → ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))))
205204eqeq1d 2735 . . . . . . . . . . . . . 14 (𝑧 = (𝐺‘(𝑚 − 1)) → (((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅ ↔ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
206203, 205orbi12d 918 . . . . . . . . . . . . 13 (𝑧 = (𝐺‘(𝑚 − 1)) → (((𝐺‘(𝑛 − 1)) = 𝑧 ∨ ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅) ↔ ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅)))
207202, 206rspc2va 3623 . . . . . . . . . . . 12 ((((𝐺‘(𝑛 − 1)) ∈ 𝑋 ∧ (𝐺‘(𝑚 − 1)) ∈ 𝑋) ∧ ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅)) → ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
208190, 193, 198, 207syl21anc 837 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
209208adantllr 718 . . . . . . . . . 10 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
210 orel1 888 . . . . . . . . . 10 (¬ (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) → (((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅) → ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
211189, 209, 210sylc 65 . . . . . . . . 9 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅)
212156, 211eqtrd 2773 . . . . . . . 8 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
213138, 212pm2.61dan 812 . . . . . . 7 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
214119, 213pm2.61dan 812 . . . . . 6 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
215214olcd 873 . . . . 5 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
216110, 215pm2.61dane 3030 . . . 4 ((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) → (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
217216ralrimivva 3201 . . 3 (𝜑 → ∀𝑛 ∈ ℕ ∀𝑚 ∈ ℕ (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
218 fveq2 6889 . . . 4 (𝑛 = 𝑚 → (𝐹𝑛) = (𝐹𝑚))
219218disjor 5128 . . 3 (Disj 𝑛 ∈ ℕ (𝐹𝑛) ↔ ∀𝑛 ∈ ℕ ∀𝑚 ∈ ℕ (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
220217, 219sylibr 233 . 2 (𝜑Disj 𝑛 ∈ ℕ (𝐹𝑛))
221 nnex 12215 . . . . 5 ℕ ∈ V
222221mptex 7222 . . . 4 (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))) ∈ V
22324, 222eqeltri 2830 . . 3 𝐹 ∈ V
224 foeq1 6799 . . . 4 (𝑓 = 𝐹 → (𝑓:ℕ–onto→(𝑋 ∪ {∅}) ↔ 𝐹:ℕ–onto→(𝑋 ∪ {∅})))
225 simpl 484 . . . . . 6 ((𝑓 = 𝐹𝑛 ∈ ℕ) → 𝑓 = 𝐹)
226225fveq1d 6891 . . . . 5 ((𝑓 = 𝐹𝑛 ∈ ℕ) → (𝑓𝑛) = (𝐹𝑛))
227226disjeq2dv 5118 . . . 4 (𝑓 = 𝐹 → (Disj 𝑛 ∈ ℕ (𝑓𝑛) ↔ Disj 𝑛 ∈ ℕ (𝐹𝑛)))
228224, 227anbi12d 632 . . 3 (𝑓 = 𝐹 → ((𝑓:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑓𝑛)) ↔ (𝐹:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝐹𝑛))))
229223, 228spcev 3597 . 2 ((𝐹:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝐹𝑛)) → ∃𝑓(𝑓:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑓𝑛)))
230109, 220, 229syl2anc 585 1 (𝜑 → ∃𝑓(𝑓:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑓𝑛)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 205  wa 397  wo 846  w3a 1088   = wceq 1542  wex 1782  wcel 2107  wne 2941  wral 3062  wrex 3071  Vcvv 3475  cun 3946  cin 3947  wss 3948  c0 4322  ifcif 4528  {csn 4628  Disj wdisj 5113   class class class wbr 5148  cmpt 5231  ran crn 5677   Fn wfn 6536  wf 6537  1-1wf1 6538  ontowfo 6539  1-1-ontowf1o 6540  cfv 6541  (class class class)co 7406  cc 11105  1c1 11108   + caddc 11110   < clt 11245  cmin 11441  cn 12209
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pow 5363  ax-pr 5427  ax-un 7722  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2942  df-nel 3048  df-ral 3063  df-rex 3072  df-rmo 3377  df-reu 3378  df-rab 3434  df-v 3477  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-pss 3967  df-nul 4323  df-if 4529  df-pw 4604  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-iun 4999  df-disj 5114  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5574  df-eprel 5580  df-po 5588  df-so 5589  df-fr 5631  df-we 5633  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-rn 5687  df-res 5688  df-ima 5689  df-pred 6298  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6493  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-riota 7362  df-ov 7409  df-oprab 7410  df-mpo 7411  df-om 7853  df-2nd 7973  df-frecs 8263  df-wrecs 8294  df-recs 8368  df-rdg 8407  df-er 8700  df-en 8937  df-dom 8938  df-sdom 8939  df-pnf 11247  df-mnf 11248  df-xr 11249  df-ltxr 11250  df-le 11251  df-sub 11443  df-neg 11444  df-nn 12210  df-rp 12972
This theorem is referenced by:  nnfoctbdj  45159
  Copyright terms: Public domain W3C validator