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 47169
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 4493 . . . . . . . 8 ((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = ∅)
21adantl 486 . . . . . . 7 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = ∅)
3 0ex 5270 . . . . . . . . 9 ∅ ∈ V
43snid 4628 . . . . . . . 8 ∅ ∈ {∅}
5 elun2 4136 . . . . . . . 8 (∅ ∈ {∅} → ∅ ∈ (𝑋 ∪ {∅}))
64, 5ax-mp 5 . . . . . . 7 ∅ ∈ (𝑋 ∪ {∅})
72, 6eqeltrdi 2871 . . . . . 6 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
87adantll 726 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
9 iffalse 4496 . . . . . . 7 (¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑛 − 1)))
109adantl 486 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑛 − 1)))
11 nnfoctbdjlem.g . . . . . . . . . . 11 (𝜑𝐺:𝐴1-1-onto𝑋)
12 f1of 6820 . . . . . . . . . . 11 (𝐺:𝐴1-1-onto𝑋𝐺:𝐴𝑋)
1311, 12syl 18 . . . . . . . . . 10 (𝜑𝐺:𝐴𝑋)
1413adantr 485 . . . . . . . . 9 ((𝜑 ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → 𝐺:𝐴𝑋)
15 pm2.46 895 . . . . . . . . . . 11 (¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → ¬ ¬ (𝑛 − 1) ∈ 𝐴)
1615notnotrd 134 . . . . . . . . . 10 (¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → (𝑛 − 1) ∈ 𝐴)
1716adantl 486 . . . . . . . . 9 ((𝜑 ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝑛 − 1) ∈ 𝐴)
1814, 17ffvelcdmd 7080 . . . . . . . 8 ((𝜑 ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ 𝑋)
1918adantlr 727 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ 𝑋)
20 elun1 4135 . . . . . . 7 ((𝐺‘(𝑛 − 1)) ∈ 𝑋 → (𝐺‘(𝑛 − 1)) ∈ (𝑋 ∪ {∅}))
2119, 20syl 18 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ (𝑋 ∪ {∅}))
2210, 21eqeltrd 2863 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
238, 22pm2.61dan 824 . . . 4 ((𝜑𝑛 ∈ ℕ) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
24 nnfoctbdjlem.f . . . 4 𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
2523, 24fmptd 7109 . . 3 (𝜑𝐹:ℕ⟶(𝑋 ∪ {∅}))
26 simpr 489 . . . . . . . . . 10 ((𝜑𝑦𝑋) → 𝑦𝑋)
27 f1ofo 6828 . . . . . . . . . . . . 13 (𝐺:𝐴1-1-onto𝑋𝐺:𝐴onto𝑋)
28 forn 6795 . . . . . . . . . . . . 13 (𝐺:𝐴onto𝑋 → ran 𝐺 = 𝑋)
2911, 27, 283syl 19 . . . . . . . . . . . 12 (𝜑 → ran 𝐺 = 𝑋)
3029eqcomd 2769 . . . . . . . . . . 11 (𝜑𝑋 = ran 𝐺)
3130adantr 485 . . . . . . . . . 10 ((𝜑𝑦𝑋) → 𝑋 = ran 𝐺)
3226, 31eleqtrd 2865 . . . . . . . . 9 ((𝜑𝑦𝑋) → 𝑦 ∈ ran 𝐺)
3313ffnd 6706 . . . . . . . . . . 11 (𝜑𝐺 Fn 𝐴)
34 fvelrnb 6941 . . . . . . . . . . 11 (𝐺 Fn 𝐴 → (𝑦 ∈ ran 𝐺 ↔ ∃𝑘𝐴 (𝐺𝑘) = 𝑦))
3533, 34syl 18 . . . . . . . . . 10 (𝜑 → (𝑦 ∈ ran 𝐺 ↔ ∃𝑘𝐴 (𝐺𝑘) = 𝑦))
3635adantr 485 . . . . . . . . 9 ((𝜑𝑦𝑋) → (𝑦 ∈ ran 𝐺 ↔ ∃𝑘𝐴 (𝐺𝑘) = 𝑦))
3732, 36mpbid 235 . . . . . . . 8 ((𝜑𝑦𝑋) → ∃𝑘𝐴 (𝐺𝑘) = 𝑦)
38 nnfoctbdjlem.a . . . . . . . . . . . . . . 15 (𝜑𝐴 ⊆ ℕ)
3938sselda 3937 . . . . . . . . . . . . . 14 ((𝜑𝑘𝐴) → 𝑘 ∈ ℕ)
4039peano2nnd 12245 . . . . . . . . . . . . 13 ((𝜑𝑘𝐴) → (𝑘 + 1) ∈ ℕ)
41403adant3 1150 . . . . . . . . . . . 12 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝑘 + 1) ∈ ℕ)
4224a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑘𝐴) → 𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))))
43 1red 11204 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 1 ∈ ℝ)
44 1red 11204 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑘𝐴) → 1 ∈ ℝ)
4539nnrpd 13053 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑘𝐴) → 𝑘 ∈ ℝ+)
4644, 45ltaddrp2d 13089 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘𝐴) → 1 < (𝑘 + 1))
4746adantr 485 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 1 < (𝑘 + 1))
48 id 23 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = (𝑘 + 1) → 𝑛 = (𝑘 + 1))
4948eqcomd 2769 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = (𝑘 + 1) → (𝑘 + 1) = 𝑛)
5049adantl 486 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝑘 + 1) = 𝑛)
5147, 50breqtrd 5137 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 1 < 𝑛)
5243, 51gtned 11340 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 𝑛 ≠ 1)
5352neneqd 2963 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → ¬ 𝑛 = 1)
54 oveq1 7417 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = (𝑘 + 1) → (𝑛 − 1) = ((𝑘 + 1) − 1))
5539nncnd 12244 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘𝐴) → 𝑘 ∈ ℂ)
56 1cnd 11197 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘𝐴) → 1 ∈ ℂ)
5755, 56pncand 11565 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑘𝐴) → ((𝑘 + 1) − 1) = 𝑘)
5854, 57sylan9eqr 2820 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝑛 − 1) = 𝑘)
59 simplr 780 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 𝑘𝐴)
6058, 59eqeltrd 2863 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝑛 − 1) ∈ 𝐴)
6160notnotd 145 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → ¬ ¬ (𝑛 − 1) ∈ 𝐴)
62 ioran 999 . . . . . . . . . . . . . . . . . 18 (¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ↔ (¬ 𝑛 = 1 ∧ ¬ ¬ (𝑛 − 1) ∈ 𝐴))
6353, 61, 62sylanbrc 594 . . . . . . . . . . . . . . . . 17 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴))
6463iffalsed 4498 . . . . . . . . . . . . . . . 16 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑛 − 1)))
6558fveq2d 6885 . . . . . . . . . . . . . . . 16 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝐺‘(𝑛 − 1)) = (𝐺𝑘))
6664, 65eqtrd 2798 . . . . . . . . . . . . . . 15 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺𝑘))
6713ffvelcdmda 7079 . . . . . . . . . . . . . . 15 ((𝜑𝑘𝐴) → (𝐺𝑘) ∈ 𝑋)
6842, 66, 40, 67fvmptd 6997 . . . . . . . . . . . . . 14 ((𝜑𝑘𝐴) → (𝐹‘(𝑘 + 1)) = (𝐺𝑘))
69683adant3 1150 . . . . . . . . . . . . 13 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝐹‘(𝑘 + 1)) = (𝐺𝑘))
70 simp3 1156 . . . . . . . . . . . . 13 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝐺𝑘) = 𝑦)
7169, 70eqtrd 2798 . . . . . . . . . . . 12 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝐹‘(𝑘 + 1)) = 𝑦)
72 fveq2 6881 . . . . . . . . . . . . . 14 (𝑚 = (𝑘 + 1) → (𝐹𝑚) = (𝐹‘(𝑘 + 1)))
7372eqeq1d 2765 . . . . . . . . . . . . 13 (𝑚 = (𝑘 + 1) → ((𝐹𝑚) = 𝑦 ↔ (𝐹‘(𝑘 + 1)) = 𝑦))
7473rspcev 3581 . . . . . . . . . . . 12 (((𝑘 + 1) ∈ ℕ ∧ (𝐹‘(𝑘 + 1)) = 𝑦) → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)
7541, 71, 74syl2anc 595 . . . . . . . . . . 11 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)
76753exp 1137 . . . . . . . . . 10 (𝜑 → (𝑘𝐴 → ((𝐺𝑘) = 𝑦 → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)))
7776adantr 485 . . . . . . . . 9 ((𝜑𝑦𝑋) → (𝑘𝐴 → ((𝐺𝑘) = 𝑦 → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)))
7877rexlimdv 3164 . . . . . . . 8 ((𝜑𝑦𝑋) → (∃𝑘𝐴 (𝐺𝑘) = 𝑦 → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦))
7937, 78mpd 16 . . . . . . 7 ((𝜑𝑦𝑋) → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)
80 id 23 . . . . . . . . . 10 ((𝐹𝑚) = 𝑦 → (𝐹𝑚) = 𝑦)
8180eqcomd 2769 . . . . . . . . 9 ((𝐹𝑚) = 𝑦𝑦 = (𝐹𝑚))
8281a1i 11 . . . . . . . 8 (((𝜑𝑦𝑋) ∧ 𝑚 ∈ ℕ) → ((𝐹𝑚) = 𝑦𝑦 = (𝐹𝑚)))
8382reximdva 3178 . . . . . . 7 ((𝜑𝑦𝑋) → (∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦 → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚)))
8479, 83mpd 16 . . . . . 6 ((𝜑𝑦𝑋) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
8584adantlr 727 . . . . 5 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ 𝑦𝑋) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
86 simpll 778 . . . . . 6 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ ¬ 𝑦𝑋) → 𝜑)
87 elunnel1 4108 . . . . . . . 8 ((𝑦 ∈ (𝑋 ∪ {∅}) ∧ ¬ 𝑦𝑋) → 𝑦 ∈ {∅})
88 elsni 4606 . . . . . . . 8 (𝑦 ∈ {∅} → 𝑦 = ∅)
8987, 88syl 18 . . . . . . 7 ((𝑦 ∈ (𝑋 ∪ {∅}) ∧ ¬ 𝑦𝑋) → 𝑦 = ∅)
9089adantll 726 . . . . . 6 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ ¬ 𝑦𝑋) → 𝑦 = ∅)
91 1nn 12239 . . . . . . . 8 1 ∈ ℕ
9291a1i 11 . . . . . . 7 ((𝜑𝑦 = ∅) → 1 ∈ ℕ)
931orcs 888 . . . . . . . . . 10 (𝑛 = 1 → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = ∅)
9491a1i 11 . . . . . . . . . 10 (𝜑 → 1 ∈ ℕ)
953a1i 11 . . . . . . . . . 10 (𝜑 → ∅ ∈ V)
9624, 93, 94, 95fvmptd3 7013 . . . . . . . . 9 (𝜑 → (𝐹‘1) = ∅)
9796adantr 485 . . . . . . . 8 ((𝜑𝑦 = ∅) → (𝐹‘1) = ∅)
98 id 23 . . . . . . . . . 10 (𝑦 = ∅ → 𝑦 = ∅)
9998eqcomd 2769 . . . . . . . . 9 (𝑦 = ∅ → ∅ = 𝑦)
10099adantl 486 . . . . . . . 8 ((𝜑𝑦 = ∅) → ∅ = 𝑦)
10197, 100eqtr2d 2799 . . . . . . 7 ((𝜑𝑦 = ∅) → 𝑦 = (𝐹‘1))
102 fveq2 6881 . . . . . . . 8 (𝑚 = 1 → (𝐹𝑚) = (𝐹‘1))
103102rspceeqv 3604 . . . . . . 7 ((1 ∈ ℕ ∧ 𝑦 = (𝐹‘1)) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
10492, 101, 103syl2anc 595 . . . . . 6 ((𝜑𝑦 = ∅) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
10586, 90, 104syl2anc 595 . . . . 5 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ ¬ 𝑦𝑋) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
10685, 105pm2.61dan 824 . . . 4 ((𝜑𝑦 ∈ (𝑋 ∪ {∅})) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
107106ralrimiva 3157 . . 3 (𝜑 → ∀𝑦 ∈ (𝑋 ∪ {∅})∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
108 dffo3 7097 . . 3 (𝐹:ℕ–onto→(𝑋 ∪ {∅}) ↔ (𝐹:ℕ⟶(𝑋 ∪ {∅}) ∧ ∀𝑦 ∈ (𝑋 ∪ {∅})∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚)))
10925, 107, 108sylanbrc 594 . 2 (𝜑𝐹:ℕ–onto→(𝑋 ∪ {∅}))
110 animorrl 996 . . . . 5 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛 = 𝑚) → (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
1112, 3eqeltrdi 2871 . . . . . . . . . . . . 13 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ V)
11224fvmpt2 7001 . . . . . . . . . . . . 13 ((𝑛 ∈ ℕ ∧ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ V) → (𝐹𝑛) = if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
113111, 112syldan 602 . . . . . . . . . . . 12 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
114113, 2eqtrd 2798 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = ∅)
115114ineq1d 4172 . . . . . . . . . 10 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = (∅ ∩ (𝐹𝑚)))
116 0in 4354 . . . . . . . . . 10 (∅ ∩ (𝐹𝑚)) = ∅
117115, 116eqtrdi 2814 . . . . . . . . 9 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
118117adantlr 727 . . . . . . . 8 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
119118ad4ant24 766 . . . . . . 7 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
120 eqeq1 2767 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑚 → (𝑛 = 1 ↔ 𝑚 = 1))
121 oveq1 7417 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑚 → (𝑛 − 1) = (𝑚 − 1))
122121eleq1d 2848 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑚 → ((𝑛 − 1) ∈ 𝐴 ↔ (𝑚 − 1) ∈ 𝐴))
123122notbid 321 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑚 → (¬ (𝑛 − 1) ∈ 𝐴 ↔ ¬ (𝑚 − 1) ∈ 𝐴))
124120, 123orbi12d 931 . . . . . . . . . . . . . . 15 (𝑛 = 𝑚 → ((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ↔ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)))
125121fveq2d 6885 . . . . . . . . . . . . . . 15 (𝑛 = 𝑚 → (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)))
126124, 125ifbieq2d 4514 . . . . . . . . . . . . . 14 (𝑛 = 𝑚 → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))))
127 simpl 487 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → 𝑚 ∈ ℕ)
128 iftrue 4493 . . . . . . . . . . . . . . . 16 ((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = ∅)
129128, 3eqeltrdi 2871 . . . . . . . . . . . . . . 15 ((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) ∈ V)
130129adantl 486 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) ∈ V)
13124, 126, 127, 130fvmptd3 7013 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))))
132128adantl 486 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = ∅)
133131, 132eqtrd 2798 . . . . . . . . . . . 12 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = ∅)
134133ineq2d 4173 . . . . . . . . . . 11 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ((𝐹𝑛) ∩ ∅))
135 in0 4352 . . . . . . . . . . 11 ((𝐹𝑛) ∩ ∅) = ∅
136134, 135eqtrdi 2814 . . . . . . . . . 10 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
137136adantll 726 . . . . . . . . 9 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
138137ad5ant25 773 . . . . . . . 8 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
139 fvex 6894 . . . . . . . . . . . . . . . 16 (𝐺‘(𝑛 − 1)) ∈ V
1403, 139ifex 4538 . . . . . . . . . . . . . . 15 if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ V
141140, 112mpan2 703 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝐹𝑛) = if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
142141, 9sylan9eq 2818 . . . . . . . . . . . . 13 ((𝑛 ∈ ℕ ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = (𝐺‘(𝑛 − 1)))
143142adantlr 727 . . . . . . . . . . . 12 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = (𝐺‘(𝑛 − 1)))
1441433adant3 1150 . . . . . . . . . . 11 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑛) = (𝐺‘(𝑛 − 1)))
14524a1i 11 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → 𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))))
146126adantl 486 . . . . . . . . . . . . . . 15 (((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) ∧ 𝑛 = 𝑚) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))))
147 iffalse 4496 . . . . . . . . . . . . . . . 16 (¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = (𝐺‘(𝑚 − 1)))
148147ad2antlr 739 . . . . . . . . . . . . . . 15 (((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) ∧ 𝑛 = 𝑚) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = (𝐺‘(𝑚 − 1)))
149146, 148eqtrd 2798 . . . . . . . . . . . . . 14 (((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) ∧ 𝑛 = 𝑚) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑚 − 1)))
150 simpl 487 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → 𝑚 ∈ ℕ)
151 fvexd 6896 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑚 − 1)) ∈ V)
152145, 149, 150, 151fvmptd 6997 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = (𝐺‘(𝑚 − 1)))
153152adantll 726 . . . . . . . . . . . 12 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = (𝐺‘(𝑚 − 1)))
1541533adant2 1149 . . . . . . . . . . 11 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = (𝐺‘(𝑚 − 1)))
155144, 154ineq12d 4174 . . . . . . . . . 10 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))))
156155ad5ant245 1384 . . . . . . . . 9 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))))
15716ad2antlr 739 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝑛 − 1) ∈ 𝐴)
158 pm2.46 895 . . . . . . . . . . . . . . 15 (¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → ¬ ¬ (𝑚 − 1) ∈ 𝐴)
159158notnotrd 134 . . . . . . . . . . . . . 14 (¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → (𝑚 − 1) ∈ 𝐴)
160159adantl 486 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝑚 − 1) ∈ 𝐴)
161 f1of1 6819 . . . . . . . . . . . . . . . . . 18 (𝐺:𝐴1-1-onto𝑋𝐺:𝐴1-1𝑋)
16211, 161syl 18 . . . . . . . . . . . . . . . . 17 (𝜑𝐺:𝐴1-1𝑋)
163 dff14a 7268 . . . . . . . . . . . . . . . . 17 (𝐺:𝐴1-1𝑋 ↔ (𝐺:𝐴𝑋 ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))))
164162, 163sylib 221 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐺:𝐴𝑋 ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))))
165164simprd 500 . . . . . . . . . . . . . . 15 (𝜑 → ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)))
166165adantr 485 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) → ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)))
167166ad3antrrr 742 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)))
168157, 160, 167jca31 523 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (((𝑛 − 1) ∈ 𝐴 ∧ (𝑚 − 1) ∈ 𝐴) ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))))
169 nncn 12236 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
170169adantr 485 . . . . . . . . . . . . . . 15 ((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) → 𝑛 ∈ ℂ)
171170ad2antlr 739 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 𝑛 ∈ ℂ)
172 nncn 12236 . . . . . . . . . . . . . . . 16 (𝑚 ∈ ℕ → 𝑚 ∈ ℂ)
173172adantl 486 . . . . . . . . . . . . . . 15 ((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℂ)
174173ad2antlr 739 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 𝑚 ∈ ℂ)
175 1cnd 11197 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 1 ∈ ℂ)
176 simpr 489 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 𝑛𝑚)
177171, 174, 175, 176subneintr2d 11610 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → (𝑛 − 1) ≠ (𝑚 − 1))
178177ad2antrr 738 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝑛 − 1) ≠ (𝑚 − 1))
179 neeq1 3020 . . . . . . . . . . . . . 14 (𝑥 = (𝑛 − 1) → (𝑥𝑦 ↔ (𝑛 − 1) ≠ 𝑦))
180 fveq2 6881 . . . . . . . . . . . . . . 15 (𝑥 = (𝑛 − 1) → (𝐺𝑥) = (𝐺‘(𝑛 − 1)))
181180neeq1d 3017 . . . . . . . . . . . . . 14 (𝑥 = (𝑛 − 1) → ((𝐺𝑥) ≠ (𝐺𝑦) ↔ (𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦)))
182179, 181imbi12d 347 . . . . . . . . . . . . 13 (𝑥 = (𝑛 − 1) → ((𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)) ↔ ((𝑛 − 1) ≠ 𝑦 → (𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦))))
183 neeq2 3021 . . . . . . . . . . . . . 14 (𝑦 = (𝑚 − 1) → ((𝑛 − 1) ≠ 𝑦 ↔ (𝑛 − 1) ≠ (𝑚 − 1)))
184 fveq2 6881 . . . . . . . . . . . . . . 15 (𝑦 = (𝑚 − 1) → (𝐺𝑦) = (𝐺‘(𝑚 − 1)))
185184neeq2d 3018 . . . . . . . . . . . . . 14 (𝑦 = (𝑚 − 1) → ((𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦) ↔ (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1))))
186183, 185imbi12d 347 . . . . . . . . . . . . 13 (𝑦 = (𝑚 − 1) → (((𝑛 − 1) ≠ 𝑦 → (𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦)) ↔ ((𝑛 − 1) ≠ (𝑚 − 1) → (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1)))))
187182, 186rspc2va 3593 . . . . . . . . . . . 12 ((((𝑛 − 1) ∈ 𝐴 ∧ (𝑚 − 1) ∈ 𝐴) ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))) → ((𝑛 − 1) ≠ (𝑚 − 1) → (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1))))
188168, 178, 187sylc 66 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1)))
189188neneqd 2963 . . . . . . . . . 10 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ¬ (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)))
19018ad4ant13 763 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ 𝑋)
19113ffvelcdmda 7079 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑚 − 1) ∈ 𝐴) → (𝐺‘(𝑚 − 1)) ∈ 𝑋)
192159, 191sylan2 604 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑚 − 1)) ∈ 𝑋)
193192ad4ant14 764 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑚 − 1)) ∈ 𝑋)
194 nnfoctbdjlem.dj . . . . . . . . . . . . . 14 (𝜑Disj 𝑦𝑋 𝑦)
195 id 23 . . . . . . . . . . . . . . 15 (𝑦 = 𝑧𝑦 = 𝑧)
196195disjor 5091 . . . . . . . . . . . . . 14 (Disj 𝑦𝑋 𝑦 ↔ ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅))
197194, 196sylib 221 . . . . . . . . . . . . 13 (𝜑 → ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅))
198197ad3antrrr 742 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅))
199 eqeq1 2767 . . . . . . . . . . . . . 14 (𝑦 = (𝐺‘(𝑛 − 1)) → (𝑦 = 𝑧 ↔ (𝐺‘(𝑛 − 1)) = 𝑧))
200 ineq1 4166 . . . . . . . . . . . . . . 15 (𝑦 = (𝐺‘(𝑛 − 1)) → (𝑦𝑧) = ((𝐺‘(𝑛 − 1)) ∩ 𝑧))
201200eqeq1d 2765 . . . . . . . . . . . . . 14 (𝑦 = (𝐺‘(𝑛 − 1)) → ((𝑦𝑧) = ∅ ↔ ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅))
202199, 201orbi12d 931 . . . . . . . . . . . . 13 (𝑦 = (𝐺‘(𝑛 − 1)) → ((𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅) ↔ ((𝐺‘(𝑛 − 1)) = 𝑧 ∨ ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅)))
203 eqeq2 2775 . . . . . . . . . . . . . 14 (𝑧 = (𝐺‘(𝑚 − 1)) → ((𝐺‘(𝑛 − 1)) = 𝑧 ↔ (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1))))
204 ineq2 4167 . . . . . . . . . . . . . . 15 (𝑧 = (𝐺‘(𝑚 − 1)) → ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))))
205204eqeq1d 2765 . . . . . . . . . . . . . 14 (𝑧 = (𝐺‘(𝑚 − 1)) → (((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅ ↔ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
206203, 205orbi12d 931 . . . . . . . . . . . . 13 (𝑧 = (𝐺‘(𝑚 − 1)) → (((𝐺‘(𝑛 − 1)) = 𝑧 ∨ ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅) ↔ ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅)))
207202, 206rspc2va 3593 . . . . . . . . . . . 12 ((((𝐺‘(𝑛 − 1)) ∈ 𝑋 ∧ (𝐺‘(𝑚 − 1)) ∈ 𝑋) ∧ ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅)) → ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
208190, 193, 198, 207syl21anc 850 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
209208adantllr 731 . . . . . . . . . 10 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
210 orel1 901 . . . . . . . . . 10 (¬ (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) → (((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅) → ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
211189, 209, 210sylc 66 . . . . . . . . 9 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅)
212156, 211eqtrd 2798 . . . . . . . 8 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
213138, 212pm2.61dan 824 . . . . . . 7 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
214119, 213pm2.61dan 824 . . . . . 6 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
215214olcd 887 . . . . 5 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
216110, 215pm2.61dane 3045 . . . 4 ((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) → (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
217216ralrimivva 3208 . . 3 (𝜑 → ∀𝑛 ∈ ℕ ∀𝑚 ∈ ℕ (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
218 fveq2 6881 . . . 4 (𝑛 = 𝑚 → (𝐹𝑛) = (𝐹𝑚))
219218disjor 5091 . . 3 (Disj 𝑛 ∈ ℕ (𝐹𝑛) ↔ ∀𝑛 ∈ ℕ ∀𝑚 ∈ ℕ (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
220217, 219sylibr 237 . 2 (𝜑Disj 𝑛 ∈ ℕ (𝐹𝑛))
221 nnex 12234 . . . . 5 ℕ ∈ V
222221mptex 7221 . . . 4 (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))) ∈ V
22324, 222eqeltri 2859 . . 3 𝐹 ∈ V
224 foeq1 6788 . . . 4 (𝑓 = 𝐹 → (𝑓:ℕ–onto→(𝑋 ∪ {∅}) ↔ 𝐹:ℕ–onto→(𝑋 ∪ {∅})))
225 simpl 487 . . . . . 6 ((𝑓 = 𝐹𝑛 ∈ ℕ) → 𝑓 = 𝐹)
226225fveq1d 6883 . . . . 5 ((𝑓 = 𝐹𝑛 ∈ ℕ) → (𝑓𝑛) = (𝐹𝑛))
227226disjeq2dv 5081 . . . 4 (𝑓 = 𝐹 → (Disj 𝑛 ∈ ℕ (𝑓𝑛) ↔ Disj 𝑛 ∈ ℕ (𝐹𝑛)))
228224, 227anbi12d 643 . . 3 (𝑓 = 𝐹 → ((𝑓:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑓𝑛)) ↔ (𝐹:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝐹𝑛))))
229223, 228spcev 3565 . 2 ((𝐹:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝐹𝑛)) → ∃𝑓(𝑓:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑓𝑛)))
230109, 220, 229syl2anc 595 1 (𝜑 → ∃𝑓(𝑓:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑓𝑛)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 209  wa 400  wo 860  w3a 1103   = wceq 1570  wex 1809  wcel 2143  wne 2958  wral 3079  wrex 3089  Vcvv 3455  cun 3903  cin 3904  wss 3905  c0 4286  ifcif 4487  {csn 4589  Disj wdisj 5076   class class class wbr 5109  cmpt 5192  ran crn 5662   Fn wfn 6531  wf 6532  1-1wf1 6533  ontowfo 6534  1-1-ontowf1o 6535  cfv 6536  (class class class)co 7410  cc 11093  1c1 11096   + caddc 11098   < clt 11238  cmin 11436  cn 12228
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-cnex 11151  ax-resscn 11152  ax-1cn 11153  ax-icn 11154  ax-addcl 11155  ax-addrcl 11156  ax-mulcl 11157  ax-mulrcl 11158  ax-mulcom 11159  ax-addass 11160  ax-mulass 11161  ax-distr 11162  ax-i2m1 11163  ax-1ne0 11164  ax-1rid 11165  ax-rnegex 11166  ax-rrecex 11167  ax-cnre 11168  ax-pre-lttri 11169  ax-pre-lttrn 11170  ax-pre-ltadd 11171  ax-pre-mulgt0 11172
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-iun 4958  df-disj 5077  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7859  df-2nd 7983  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-er 8690  df-en 8940  df-dom 8941  df-sdom 8942  df-pnf 11240  df-mnf 11241  df-xr 11242  df-ltxr 11243  df-le 11244  df-sub 11438  df-neg 11439  df-nn 12229  df-rp 13012
This theorem is referenced by:  nnfoctbdj  47170
  Copyright terms: Public domain W3C validator