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 47060
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 4498 . . . . . . . 8 ((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = ∅)
21adantl 486 . . . . . . 7 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = ∅)
3 0ex 5272 . . . . . . . . 9 ∅ ∈ V
43snid 4633 . . . . . . . 8 ∅ ∈ {∅}
5 elun2 4144 . . . . . . . 8 (∅ ∈ {∅} → ∅ ∈ (𝑋 ∪ {∅}))
64, 5ax-mp 5 . . . . . . 7 ∅ ∈ (𝑋 ∪ {∅})
72, 6eqeltrdi 2877 . . . . . 6 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
87adantll 726 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
9 iffalse 4501 . . . . . . 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 6821 . . . . . . . . . . 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 7081 . . . . . . . 8 ((𝜑 ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ 𝑋)
1918adantlr 727 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ 𝑋)
20 elun1 4143 . . . . . . 7 ((𝐺‘(𝑛 − 1)) ∈ 𝑋 → (𝐺‘(𝑛 − 1)) ∈ (𝑋 ∪ {∅}))
2119, 20syl 18 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ (𝑋 ∪ {∅}))
2210, 21eqeltrd 2869 . . . . 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 7110 . . 3 (𝜑𝐹:ℕ⟶(𝑋 ∪ {∅}))
26 simpr 489 . . . . . . . . . 10 ((𝜑𝑦𝑋) → 𝑦𝑋)
27 f1ofo 6829 . . . . . . . . . . . . 13 (𝐺:𝐴1-1-onto𝑋𝐺:𝐴onto𝑋)
28 forn 6796 . . . . . . . . . . . . 13 (𝐺:𝐴onto𝑋 → ran 𝐺 = 𝑋)
2911, 27, 283syl 19 . . . . . . . . . . . 12 (𝜑 → ran 𝐺 = 𝑋)
3029eqcomd 2775 . . . . . . . . . . 11 (𝜑𝑋 = ran 𝐺)
3130adantr 485 . . . . . . . . . 10 ((𝜑𝑦𝑋) → 𝑋 = ran 𝐺)
3226, 31eleqtrd 2871 . . . . . . . . 9 ((𝜑𝑦𝑋) → 𝑦 ∈ ran 𝐺)
3313ffnd 6707 . . . . . . . . . . 11 (𝜑𝐺 Fn 𝐴)
34 fvelrnb 6942 . . . . . . . . . . 11 (𝐺 Fn 𝐴 → (𝑦 ∈ ran 𝐺 ↔ ∃𝑘𝐴 (𝐺𝑘) = 𝑦))
3533, 34syl 18 . . . . . . . . . 10 (𝜑 → (𝑦 ∈ ran 𝐺 ↔ ∃𝑘𝐴 (𝐺𝑘) = 𝑦))
3635adantr 485 . . . . . . . . 9 ((𝜑𝑦𝑋) → (𝑦 ∈ ran 𝐺 ↔ ∃𝑘𝐴 (𝐺𝑘) = 𝑦))
3732, 36mpbid 235 . . . . . . . 8 ((𝜑𝑦𝑋) → ∃𝑘𝐴 (𝐺𝑘) = 𝑦)
38 nnfoctbdjlem.a . . . . . . . . . . . . . . 15 (𝜑𝐴 ⊆ ℕ)
3938sselda 3945 . . . . . . . . . . . . . 14 ((𝜑𝑘𝐴) → 𝑘 ∈ ℕ)
4039peano2nnd 12249 . . . . . . . . . . . . 13 ((𝜑𝑘𝐴) → (𝑘 + 1) ∈ ℕ)
41403adant3 1148 . . . . . . . . . . . 12 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝑘 + 1) ∈ ℕ)
4224a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑘𝐴) → 𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))))
43 1red 11208 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 1 ∈ ℝ)
44 1red 11208 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑘𝐴) → 1 ∈ ℝ)
4539nnrpd 13057 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑘𝐴) → 𝑘 ∈ ℝ+)
4644, 45ltaddrp2d 13093 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘𝐴) → 1 < (𝑘 + 1))
4746adantr 485 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 1 < (𝑘 + 1))
48 id 23 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = (𝑘 + 1) → 𝑛 = (𝑘 + 1))
4948eqcomd 2775 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = (𝑘 + 1) → (𝑘 + 1) = 𝑛)
5049adantl 486 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝑘 + 1) = 𝑛)
5147, 50breqtrd 5141 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 1 < 𝑛)
5243, 51gtned 11344 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 𝑛 ≠ 1)
5352neneqd 2969 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → ¬ 𝑛 = 1)
54 oveq1 7418 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = (𝑘 + 1) → (𝑛 − 1) = ((𝑘 + 1) − 1))
5539nncnd 12248 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘𝐴) → 𝑘 ∈ ℂ)
56 1cnd 11201 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘𝐴) → 1 ∈ ℂ)
5755, 56pncand 11569 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑘𝐴) → ((𝑘 + 1) − 1) = 𝑘)
5854, 57sylan9eqr 2826 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝑛 − 1) = 𝑘)
59 simplr 780 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 𝑘𝐴)
6058, 59eqeltrd 2869 . . . . . . . . . . . . . . . . . . 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 4503 . . . . . . . . . . . . . . . 16 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑛 − 1)))
6558fveq2d 6886 . . . . . . . . . . . . . . . 16 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝐺‘(𝑛 − 1)) = (𝐺𝑘))
6664, 65eqtrd 2804 . . . . . . . . . . . . . . 15 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺𝑘))
6713ffvelcdmda 7080 . . . . . . . . . . . . . . 15 ((𝜑𝑘𝐴) → (𝐺𝑘) ∈ 𝑋)
6842, 66, 40, 67fvmptd 6998 . . . . . . . . . . . . . 14 ((𝜑𝑘𝐴) → (𝐹‘(𝑘 + 1)) = (𝐺𝑘))
69683adant3 1148 . . . . . . . . . . . . 13 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝐹‘(𝑘 + 1)) = (𝐺𝑘))
70 simp3 1154 . . . . . . . . . . . . 13 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝐺𝑘) = 𝑦)
7169, 70eqtrd 2804 . . . . . . . . . . . 12 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝐹‘(𝑘 + 1)) = 𝑦)
72 fveq2 6882 . . . . . . . . . . . . . 14 (𝑚 = (𝑘 + 1) → (𝐹𝑚) = (𝐹‘(𝑘 + 1)))
7372eqeq1d 2771 . . . . . . . . . . . . 13 (𝑚 = (𝑘 + 1) → ((𝐹𝑚) = 𝑦 ↔ (𝐹‘(𝑘 + 1)) = 𝑦))
7473rspcev 3590 . . . . . . . . . . . 12 (((𝑘 + 1) ∈ ℕ ∧ (𝐹‘(𝑘 + 1)) = 𝑦) → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)
7541, 71, 74syl2anc 595 . . . . . . . . . . 11 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)
76753exp 1135 . . . . . . . . . 10 (𝜑 → (𝑘𝐴 → ((𝐺𝑘) = 𝑦 → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)))
7776adantr 485 . . . . . . . . 9 ((𝜑𝑦𝑋) → (𝑘𝐴 → ((𝐺𝑘) = 𝑦 → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)))
7877rexlimdv 3170 . . . . . . . 8 ((𝜑𝑦𝑋) → (∃𝑘𝐴 (𝐺𝑘) = 𝑦 → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦))
7937, 78mpd 16 . . . . . . 7 ((𝜑𝑦𝑋) → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)
80 id 23 . . . . . . . . . 10 ((𝐹𝑚) = 𝑦 → (𝐹𝑚) = 𝑦)
8180eqcomd 2775 . . . . . . . . 9 ((𝐹𝑚) = 𝑦𝑦 = (𝐹𝑚))
8281a1i 11 . . . . . . . 8 (((𝜑𝑦𝑋) ∧ 𝑚 ∈ ℕ) → ((𝐹𝑚) = 𝑦𝑦 = (𝐹𝑚)))
8382reximdva 3184 . . . . . . 7 ((𝜑𝑦𝑋) → (∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦 → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚)))
8479, 83mpd 16 . . . . . 6 ((𝜑𝑦𝑋) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
8584adantlr 727 . . . . 5 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ 𝑦𝑋) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
86 simpll 778 . . . . . 6 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ ¬ 𝑦𝑋) → 𝜑)
87 elunnel1 4116 . . . . . . . 8 ((𝑦 ∈ (𝑋 ∪ {∅}) ∧ ¬ 𝑦𝑋) → 𝑦 ∈ {∅})
88 elsni 4611 . . . . . . . 8 (𝑦 ∈ {∅} → 𝑦 = ∅)
8987, 88syl 18 . . . . . . 7 ((𝑦 ∈ (𝑋 ∪ {∅}) ∧ ¬ 𝑦𝑋) → 𝑦 = ∅)
9089adantll 726 . . . . . 6 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ ¬ 𝑦𝑋) → 𝑦 = ∅)
91 1nn 12243 . . . . . . . 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 7014 . . . . . . . . 9 (𝜑 → (𝐹‘1) = ∅)
9796adantr 485 . . . . . . . 8 ((𝜑𝑦 = ∅) → (𝐹‘1) = ∅)
98 id 23 . . . . . . . . . 10 (𝑦 = ∅ → 𝑦 = ∅)
9998eqcomd 2775 . . . . . . . . 9 (𝑦 = ∅ → ∅ = 𝑦)
10099adantl 486 . . . . . . . 8 ((𝜑𝑦 = ∅) → ∅ = 𝑦)
10197, 100eqtr2d 2805 . . . . . . 7 ((𝜑𝑦 = ∅) → 𝑦 = (𝐹‘1))
102 fveq2 6882 . . . . . . . 8 (𝑚 = 1 → (𝐹𝑚) = (𝐹‘1))
103102rspceeqv 3613 . . . . . . 7 ((1 ∈ ℕ ∧ 𝑦 = (𝐹‘1)) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
10492, 101, 103syl2anc 595 . . . . . 6 ((𝜑𝑦 = ∅) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
10586, 90, 104syl2anc 595 . . . . 5 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ ¬ 𝑦𝑋) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
10685, 105pm2.61dan 824 . . . 4 ((𝜑𝑦 ∈ (𝑋 ∪ {∅})) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
107106ralrimiva 3163 . . 3 (𝜑 → ∀𝑦 ∈ (𝑋 ∪ {∅})∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
108 dffo3 7098 . . 3 (𝐹:ℕ–onto→(𝑋 ∪ {∅}) ↔ (𝐹:ℕ⟶(𝑋 ∪ {∅}) ∧ ∀𝑦 ∈ (𝑋 ∪ {∅})∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚)))
10925, 107, 108sylanbrc 594 . 2 (𝜑𝐹:ℕ–onto→(𝑋 ∪ {∅}))
110 animorrl 996 . . . . 5 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛 = 𝑚) → (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
1112, 3eqeltrdi 2877 . . . . . . . . . . . . 13 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ V)
11224fvmpt2 7002 . . . . . . . . . . . . 13 ((𝑛 ∈ ℕ ∧ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ V) → (𝐹𝑛) = if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
113111, 112syldan 602 . . . . . . . . . . . 12 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
114113, 2eqtrd 2804 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = ∅)
115114ineq1d 4180 . . . . . . . . . 10 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = (∅ ∩ (𝐹𝑚)))
116 0in 4361 . . . . . . . . . 10 (∅ ∩ (𝐹𝑚)) = ∅
117115, 116eqtrdi 2820 . . . . . . . . 9 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
118117adantlr 727 . . . . . . . 8 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
119118ad4ant24 766 . . . . . . 7 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
120 eqeq1 2773 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑚 → (𝑛 = 1 ↔ 𝑚 = 1))
121 oveq1 7418 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑚 → (𝑛 − 1) = (𝑚 − 1))
122121eleq1d 2854 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑚 → ((𝑛 − 1) ∈ 𝐴 ↔ (𝑚 − 1) ∈ 𝐴))
123122notbid 321 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑚 → (¬ (𝑛 − 1) ∈ 𝐴 ↔ ¬ (𝑚 − 1) ∈ 𝐴))
124120, 123orbi12d 931 . . . . . . . . . . . . . . 15 (𝑛 = 𝑚 → ((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ↔ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)))
125121fveq2d 6886 . . . . . . . . . . . . . . 15 (𝑛 = 𝑚 → (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)))
126124, 125ifbieq2d 4519 . . . . . . . . . . . . . 14 (𝑛 = 𝑚 → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))))
127 simpl 487 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → 𝑚 ∈ ℕ)
128 iftrue 4498 . . . . . . . . . . . . . . . 16 ((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = ∅)
129128, 3eqeltrdi 2877 . . . . . . . . . . . . . . 15 ((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) ∈ V)
130129adantl 486 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) ∈ V)
13124, 126, 127, 130fvmptd3 7014 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))))
132128adantl 486 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = ∅)
133131, 132eqtrd 2804 . . . . . . . . . . . 12 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = ∅)
134133ineq2d 4181 . . . . . . . . . . 11 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ((𝐹𝑛) ∩ ∅))
135 in0 4359 . . . . . . . . . . 11 ((𝐹𝑛) ∩ ∅) = ∅
136134, 135eqtrdi 2820 . . . . . . . . . 10 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
137136adantll 726 . . . . . . . . 9 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
138137ad5ant25 773 . . . . . . . 8 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
139 fvex 6895 . . . . . . . . . . . . . . . 16 (𝐺‘(𝑛 − 1)) ∈ V
1403, 139ifex 4543 . . . . . . . . . . . . . . 15 if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ V
141140, 112mpan2 703 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝐹𝑛) = if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
142141, 9sylan9eq 2824 . . . . . . . . . . . . 13 ((𝑛 ∈ ℕ ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = (𝐺‘(𝑛 − 1)))
143142adantlr 727 . . . . . . . . . . . 12 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = (𝐺‘(𝑛 − 1)))
1441433adant3 1148 . . . . . . . . . . 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 4501 . . . . . . . . . . . . . . . 16 (¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = (𝐺‘(𝑚 − 1)))
148147ad2antlr 739 . . . . . . . . . . . . . . 15 (((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) ∧ 𝑛 = 𝑚) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = (𝐺‘(𝑚 − 1)))
149146, 148eqtrd 2804 . . . . . . . . . . . . . 14 (((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) ∧ 𝑛 = 𝑚) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑚 − 1)))
150 simpl 487 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → 𝑚 ∈ ℕ)
151 fvexd 6897 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑚 − 1)) ∈ V)
152145, 149, 150, 151fvmptd 6998 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = (𝐺‘(𝑚 − 1)))
153152adantll 726 . . . . . . . . . . . 12 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = (𝐺‘(𝑚 − 1)))
1541533adant2 1147 . . . . . . . . . . 11 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = (𝐺‘(𝑚 − 1)))
155144, 154ineq12d 4182 . . . . . . . . . 10 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))))
156155ad5ant245 1382 . . . . . . . . 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 6820 . . . . . . . . . . . . . . . . . 18 (𝐺:𝐴1-1-onto𝑋𝐺:𝐴1-1𝑋)
16211, 161syl 18 . . . . . . . . . . . . . . . . 17 (𝜑𝐺:𝐴1-1𝑋)
163 dff14a 7269 . . . . . . . . . . . . . . . . 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 12240 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
170169adantr 485 . . . . . . . . . . . . . . 15 ((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) → 𝑛 ∈ ℂ)
171170ad2antlr 739 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 𝑛 ∈ ℂ)
172 nncn 12240 . . . . . . . . . . . . . . . 16 (𝑚 ∈ ℕ → 𝑚 ∈ ℂ)
173172adantl 486 . . . . . . . . . . . . . . 15 ((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℂ)
174173ad2antlr 739 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 𝑚 ∈ ℂ)
175 1cnd 11201 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 1 ∈ ℂ)
176 simpr 489 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 𝑛𝑚)
177171, 174, 175, 176subneintr2d 11614 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → (𝑛 − 1) ≠ (𝑚 − 1))
178177ad2antrr 738 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝑛 − 1) ≠ (𝑚 − 1))
179 neeq1 3026 . . . . . . . . . . . . . 14 (𝑥 = (𝑛 − 1) → (𝑥𝑦 ↔ (𝑛 − 1) ≠ 𝑦))
180 fveq2 6882 . . . . . . . . . . . . . . 15 (𝑥 = (𝑛 − 1) → (𝐺𝑥) = (𝐺‘(𝑛 − 1)))
181180neeq1d 3023 . . . . . . . . . . . . . 14 (𝑥 = (𝑛 − 1) → ((𝐺𝑥) ≠ (𝐺𝑦) ↔ (𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦)))
182179, 181imbi12d 347 . . . . . . . . . . . . 13 (𝑥 = (𝑛 − 1) → ((𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)) ↔ ((𝑛 − 1) ≠ 𝑦 → (𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦))))
183 neeq2 3027 . . . . . . . . . . . . . 14 (𝑦 = (𝑚 − 1) → ((𝑛 − 1) ≠ 𝑦 ↔ (𝑛 − 1) ≠ (𝑚 − 1)))
184 fveq2 6882 . . . . . . . . . . . . . . 15 (𝑦 = (𝑚 − 1) → (𝐺𝑦) = (𝐺‘(𝑚 − 1)))
185184neeq2d 3024 . . . . . . . . . . . . . 14 (𝑦 = (𝑚 − 1) → ((𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦) ↔ (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1))))
186183, 185imbi12d 347 . . . . . . . . . . . . 13 (𝑦 = (𝑚 − 1) → (((𝑛 − 1) ≠ 𝑦 → (𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦)) ↔ ((𝑛 − 1) ≠ (𝑚 − 1) → (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1)))))
187182, 186rspc2va 3602 . . . . . . . . . . . 12 ((((𝑛 − 1) ∈ 𝐴 ∧ (𝑚 − 1) ∈ 𝐴) ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))) → ((𝑛 − 1) ≠ (𝑚 − 1) → (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1))))
188168, 178, 187sylc 66 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1)))
189188neneqd 2969 . . . . . . . . . 10 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ¬ (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)))
19018ad4ant13 763 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ 𝑋)
19113ffvelcdmda 7080 . . . . . . . . . . . . . 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 5095 . . . . . . . . . . . . . 14 (Disj 𝑦𝑋 𝑦 ↔ ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅))
197194, 196sylib 221 . . . . . . . . . . . . 13 (𝜑 → ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅))
198197ad3antrrr 742 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅))
199 eqeq1 2773 . . . . . . . . . . . . . 14 (𝑦 = (𝐺‘(𝑛 − 1)) → (𝑦 = 𝑧 ↔ (𝐺‘(𝑛 − 1)) = 𝑧))
200 ineq1 4174 . . . . . . . . . . . . . . 15 (𝑦 = (𝐺‘(𝑛 − 1)) → (𝑦𝑧) = ((𝐺‘(𝑛 − 1)) ∩ 𝑧))
201200eqeq1d 2771 . . . . . . . . . . . . . 14 (𝑦 = (𝐺‘(𝑛 − 1)) → ((𝑦𝑧) = ∅ ↔ ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅))
202199, 201orbi12d 931 . . . . . . . . . . . . 13 (𝑦 = (𝐺‘(𝑛 − 1)) → ((𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅) ↔ ((𝐺‘(𝑛 − 1)) = 𝑧 ∨ ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅)))
203 eqeq2 2781 . . . . . . . . . . . . . 14 (𝑧 = (𝐺‘(𝑚 − 1)) → ((𝐺‘(𝑛 − 1)) = 𝑧 ↔ (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1))))
204 ineq2 4175 . . . . . . . . . . . . . . 15 (𝑧 = (𝐺‘(𝑚 − 1)) → ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))))
205204eqeq1d 2771 . . . . . . . . . . . . . 14 (𝑧 = (𝐺‘(𝑚 − 1)) → (((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅ ↔ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
206203, 205orbi12d 931 . . . . . . . . . . . . 13 (𝑧 = (𝐺‘(𝑚 − 1)) → (((𝐺‘(𝑛 − 1)) = 𝑧 ∨ ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅) ↔ ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅)))
207202, 206rspc2va 3602 . . . . . . . . . . . 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 2804 . . . . . . . 8 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
213138, 212pm2.61dan 824 . . . . . . 7 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
214119, 213pm2.61dan 824 . . . . . 6 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
215214olcd 887 . . . . 5 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
216110, 215pm2.61dane 3051 . . . 4 ((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) → (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
217216ralrimivva 3214 . . 3 (𝜑 → ∀𝑛 ∈ ℕ ∀𝑚 ∈ ℕ (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
218 fveq2 6882 . . . 4 (𝑛 = 𝑚 → (𝐹𝑛) = (𝐹𝑚))
219218disjor 5095 . . 3 (Disj 𝑛 ∈ ℕ (𝐹𝑛) ↔ ∀𝑛 ∈ ℕ ∀𝑚 ∈ ℕ (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
220217, 219sylibr 237 . 2 (𝜑Disj 𝑛 ∈ ℕ (𝐹𝑛))
221 nnex 12238 . . . . 5 ℕ ∈ V
222221mptex 7222 . . . 4 (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))) ∈ V
22324, 222eqeltri 2865 . . 3 𝐹 ∈ V
224 foeq1 6789 . . . 4 (𝑓 = 𝐹 → (𝑓:ℕ–onto→(𝑋 ∪ {∅}) ↔ 𝐹:ℕ–onto→(𝑋 ∪ {∅})))
225 simpl 487 . . . . . 6 ((𝑓 = 𝐹𝑛 ∈ ℕ) → 𝑓 = 𝐹)
226225fveq1d 6884 . . . . 5 ((𝑓 = 𝐹𝑛 ∈ ℕ) → (𝑓𝑛) = (𝐹𝑛))
227226disjeq2dv 5085 . . . 4 (𝑓 = 𝐹 → (Disj 𝑛 ∈ ℕ (𝑓𝑛) ↔ Disj 𝑛 ∈ ℕ (𝐹𝑛)))
228224, 227anbi12d 643 . . 3 (𝑓 = 𝐹 → ((𝑓:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑓𝑛)) ↔ (𝐹:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝐹𝑛))))
229223, 228spcev 3574 . 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 1101   = wceq 1567  wex 1806  wcel 2149  wne 2964  wral 3085  wrex 3095  Vcvv 3463  cun 3911  cin 3912  wss 3913  c0 4294  ifcif 4492  {csn 4594  Disj wdisj 5080   class class class wbr 5113  cmpt 5196  ran crn 5663   Fn wfn 6532  wf 6533  1-1wf1 6534  ontowfo 6535  1-1-ontowf1o 6536  cfv 6537  (class class class)co 7411  cc 11097  1c1 11100   + caddc 11102   < clt 11242  cmin 11440  cn 12232
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733  ax-cnex 11155  ax-resscn 11156  ax-1cn 11157  ax-icn 11158  ax-addcl 11159  ax-addrcl 11160  ax-mulcl 11161  ax-mulrcl 11162  ax-mulcom 11163  ax-addass 11164  ax-mulass 11165  ax-distr 11166  ax-i2m1 11167  ax-1ne0 11168  ax-1rid 11169  ax-rnegex 11170  ax-rrecex 11171  ax-cnre 11172  ax-pre-lttri 11173  ax-pre-lttrn 11174  ax-pre-ltadd 11175  ax-pre-mulgt0 11176
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4877  df-iun 4962  df-disj 5081  df-br 5114  df-opab 5178  df-mpt 5197  df-tr 5223  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-riota 7368  df-ov 7414  df-oprab 7415  df-mpo 7416  df-om 7862  df-2nd 7986  df-frecs 8277  df-wrecs 8308  df-recs 8357  df-rdg 8396  df-er 8693  df-en 8943  df-dom 8944  df-sdom 8945  df-pnf 11244  df-mnf 11245  df-xr 11246  df-ltxr 11247  df-le 11248  df-sub 11442  df-neg 11443  df-nn 12233  df-rp 13016
This theorem is referenced by:  nnfoctbdj  47061
  Copyright terms: Public domain W3C validator