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 40990
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 4125 . . . . . . . 8 ((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = ∅)
21adantl 481 . . . . . . 7 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = ∅)
3 0ex 4823 . . . . . . . . 9 ∅ ∈ V
43snid 4241 . . . . . . . 8 ∅ ∈ {∅}
5 elun2 3814 . . . . . . . 8 (∅ ∈ {∅} → ∅ ∈ (𝑋 ∪ {∅}))
64, 5ax-mp 5 . . . . . . 7 ∅ ∈ (𝑋 ∪ {∅})
72, 6syl6eqel 2738 . . . . . 6 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
87adantll 750 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
9 iffalse 4128 . . . . . . 7 (¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑛 − 1)))
109adantl 481 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑛 − 1)))
11 nnfoctbdjlem.g . . . . . . . . . . 11 (𝜑𝐺:𝐴1-1-onto𝑋)
12 f1of 6175 . . . . . . . . . . 11 (𝐺:𝐴1-1-onto𝑋𝐺:𝐴𝑋)
1311, 12syl 17 . . . . . . . . . 10 (𝜑𝐺:𝐴𝑋)
1413adantr 480 . . . . . . . . 9 ((𝜑 ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → 𝐺:𝐴𝑋)
15 pm2.46 412 . . . . . . . . . . 11 (¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → ¬ ¬ (𝑛 − 1) ∈ 𝐴)
1615notnotrd 128 . . . . . . . . . 10 (¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) → (𝑛 − 1) ∈ 𝐴)
1716adantl 481 . . . . . . . . 9 ((𝜑 ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝑛 − 1) ∈ 𝐴)
1814, 17ffvelrnd 6400 . . . . . . . 8 ((𝜑 ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ 𝑋)
1918adantlr 751 . . . . . . 7 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ 𝑋)
20 elun1 3813 . . . . . . 7 ((𝐺‘(𝑛 − 1)) ∈ 𝑋 → (𝐺‘(𝑛 − 1)) ∈ (𝑋 ∪ {∅}))
2119, 20syl 17 . . . . . 6 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ (𝑋 ∪ {∅}))
2210, 21eqeltrd 2730 . . . . 5 (((𝜑𝑛 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
238, 22pm2.61dan 849 . . . 4 ((𝜑𝑛 ∈ ℕ) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ (𝑋 ∪ {∅}))
24 nnfoctbdjlem.f . . . 4 𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
2523, 24fmptd 6425 . . 3 (𝜑𝐹:ℕ⟶(𝑋 ∪ {∅}))
26 simpr 476 . . . . . . . . . 10 ((𝜑𝑦𝑋) → 𝑦𝑋)
27 f1ofo 6182 . . . . . . . . . . . . 13 (𝐺:𝐴1-1-onto𝑋𝐺:𝐴onto𝑋)
28 forn 6156 . . . . . . . . . . . . 13 (𝐺:𝐴onto𝑋 → ran 𝐺 = 𝑋)
2911, 27, 283syl 18 . . . . . . . . . . . 12 (𝜑 → ran 𝐺 = 𝑋)
3029eqcomd 2657 . . . . . . . . . . 11 (𝜑𝑋 = ran 𝐺)
3130adantr 480 . . . . . . . . . 10 ((𝜑𝑦𝑋) → 𝑋 = ran 𝐺)
3226, 31eleqtrd 2732 . . . . . . . . 9 ((𝜑𝑦𝑋) → 𝑦 ∈ ran 𝐺)
3313ffnd 6084 . . . . . . . . . . 11 (𝜑𝐺 Fn 𝐴)
34 fvelrnb 6282 . . . . . . . . . . 11 (𝐺 Fn 𝐴 → (𝑦 ∈ ran 𝐺 ↔ ∃𝑘𝐴 (𝐺𝑘) = 𝑦))
3533, 34syl 17 . . . . . . . . . 10 (𝜑 → (𝑦 ∈ ran 𝐺 ↔ ∃𝑘𝐴 (𝐺𝑘) = 𝑦))
3635adantr 480 . . . . . . . . 9 ((𝜑𝑦𝑋) → (𝑦 ∈ ran 𝐺 ↔ ∃𝑘𝐴 (𝐺𝑘) = 𝑦))
3732, 36mpbid 222 . . . . . . . 8 ((𝜑𝑦𝑋) → ∃𝑘𝐴 (𝐺𝑘) = 𝑦)
38 nnfoctbdjlem.a . . . . . . . . . . . . . . 15 (𝜑𝐴 ⊆ ℕ)
3938sselda 3636 . . . . . . . . . . . . . 14 ((𝜑𝑘𝐴) → 𝑘 ∈ ℕ)
4039peano2nnd 11075 . . . . . . . . . . . . 13 ((𝜑𝑘𝐴) → (𝑘 + 1) ∈ ℕ)
41403adant3 1101 . . . . . . . . . . . 12 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝑘 + 1) ∈ ℕ)
4224a1i 11 . . . . . . . . . . . . . . 15 ((𝜑𝑘𝐴) → 𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))))
43 1red 10093 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 1 ∈ ℝ)
44 1red 10093 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑘𝐴) → 1 ∈ ℝ)
4539nnrpd 11908 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑𝑘𝐴) → 𝑘 ∈ ℝ+)
4644, 45ltaddrp2d 11944 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘𝐴) → 1 < (𝑘 + 1))
4746adantr 480 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 1 < (𝑘 + 1))
48 id 22 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑛 = (𝑘 + 1) → 𝑛 = (𝑘 + 1))
4948eqcomd 2657 . . . . . . . . . . . . . . . . . . . . . 22 (𝑛 = (𝑘 + 1) → (𝑘 + 1) = 𝑛)
5049adantl 481 . . . . . . . . . . . . . . . . . . . . 21 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝑘 + 1) = 𝑛)
5147, 50breqtrd 4711 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 1 < 𝑛)
5243, 51gtned 10210 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 𝑛 ≠ 1)
5352neneqd 2828 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → ¬ 𝑛 = 1)
54 oveq1 6697 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = (𝑘 + 1) → (𝑛 − 1) = ((𝑘 + 1) − 1))
5539nncnd 11074 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘𝐴) → 𝑘 ∈ ℂ)
56 1cnd 10094 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑𝑘𝐴) → 1 ∈ ℂ)
5755, 56pncand 10431 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑𝑘𝐴) → ((𝑘 + 1) − 1) = 𝑘)
5854, 57sylan9eqr 2707 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝑛 − 1) = 𝑘)
59 simplr 807 . . . . . . . . . . . . . . . . . . . 20 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → 𝑘𝐴)
6058, 59eqeltrd 2730 . . . . . . . . . . . . . . . . . . 19 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝑛 − 1) ∈ 𝐴)
6160notnotd 138 . . . . . . . . . . . . . . . . . 18 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → ¬ ¬ (𝑛 − 1) ∈ 𝐴)
62 ioran 510 . . . . . . . . . . . . . . . . . 18 (¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ↔ (¬ 𝑛 = 1 ∧ ¬ ¬ (𝑛 − 1) ∈ 𝐴))
6353, 61, 62sylanbrc 699 . . . . . . . . . . . . . . . . 17 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴))
6463iffalsed 4130 . . . . . . . . . . . . . . . 16 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑛 − 1)))
6558fveq2d 6233 . . . . . . . . . . . . . . . 16 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → (𝐺‘(𝑛 − 1)) = (𝐺𝑘))
6664, 65eqtrd 2685 . . . . . . . . . . . . . . 15 (((𝜑𝑘𝐴) ∧ 𝑛 = (𝑘 + 1)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺𝑘))
6713ffvelrnda 6399 . . . . . . . . . . . . . . 15 ((𝜑𝑘𝐴) → (𝐺𝑘) ∈ 𝑋)
6842, 66, 40, 67fvmptd 6327 . . . . . . . . . . . . . 14 ((𝜑𝑘𝐴) → (𝐹‘(𝑘 + 1)) = (𝐺𝑘))
69683adant3 1101 . . . . . . . . . . . . 13 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝐹‘(𝑘 + 1)) = (𝐺𝑘))
70 simp3 1083 . . . . . . . . . . . . 13 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝐺𝑘) = 𝑦)
7169, 70eqtrd 2685 . . . . . . . . . . . 12 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → (𝐹‘(𝑘 + 1)) = 𝑦)
72 fveq2 6229 . . . . . . . . . . . . . 14 (𝑚 = (𝑘 + 1) → (𝐹𝑚) = (𝐹‘(𝑘 + 1)))
7372eqeq1d 2653 . . . . . . . . . . . . 13 (𝑚 = (𝑘 + 1) → ((𝐹𝑚) = 𝑦 ↔ (𝐹‘(𝑘 + 1)) = 𝑦))
7473rspcev 3340 . . . . . . . . . . . 12 (((𝑘 + 1) ∈ ℕ ∧ (𝐹‘(𝑘 + 1)) = 𝑦) → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)
7541, 71, 74syl2anc 694 . . . . . . . . . . 11 ((𝜑𝑘𝐴 ∧ (𝐺𝑘) = 𝑦) → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)
76753exp 1283 . . . . . . . . . 10 (𝜑 → (𝑘𝐴 → ((𝐺𝑘) = 𝑦 → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)))
7776adantr 480 . . . . . . . . 9 ((𝜑𝑦𝑋) → (𝑘𝐴 → ((𝐺𝑘) = 𝑦 → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)))
7877rexlimdv 3059 . . . . . . . 8 ((𝜑𝑦𝑋) → (∃𝑘𝐴 (𝐺𝑘) = 𝑦 → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦))
7937, 78mpd 15 . . . . . . 7 ((𝜑𝑦𝑋) → ∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦)
80 id 22 . . . . . . . . . 10 ((𝐹𝑚) = 𝑦 → (𝐹𝑚) = 𝑦)
8180eqcomd 2657 . . . . . . . . 9 ((𝐹𝑚) = 𝑦𝑦 = (𝐹𝑚))
8281a1i 11 . . . . . . . 8 (((𝜑𝑦𝑋) ∧ 𝑚 ∈ ℕ) → ((𝐹𝑚) = 𝑦𝑦 = (𝐹𝑚)))
8382reximdva 3046 . . . . . . 7 ((𝜑𝑦𝑋) → (∃𝑚 ∈ ℕ (𝐹𝑚) = 𝑦 → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚)))
8479, 83mpd 15 . . . . . 6 ((𝜑𝑦𝑋) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
8584adantlr 751 . . . . 5 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ 𝑦𝑋) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
86 simpll 805 . . . . . 6 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ ¬ 𝑦𝑋) → 𝜑)
87 elunnel1 3787 . . . . . . . 8 ((𝑦 ∈ (𝑋 ∪ {∅}) ∧ ¬ 𝑦𝑋) → 𝑦 ∈ {∅})
88 elsni 4227 . . . . . . . 8 (𝑦 ∈ {∅} → 𝑦 = ∅)
8987, 88syl 17 . . . . . . 7 ((𝑦 ∈ (𝑋 ∪ {∅}) ∧ ¬ 𝑦𝑋) → 𝑦 = ∅)
9089adantll 750 . . . . . 6 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ ¬ 𝑦𝑋) → 𝑦 = ∅)
91 1nn 11069 . . . . . . . 8 1 ∈ ℕ
9291a1i 11 . . . . . . 7 ((𝜑𝑦 = ∅) → 1 ∈ ℕ)
9324a1i 11 . . . . . . . . . 10 (𝜑𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))))
941orcs 408 . . . . . . . . . . 11 (𝑛 = 1 → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = ∅)
9594adantl 481 . . . . . . . . . 10 ((𝜑𝑛 = 1) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = ∅)
9691a1i 11 . . . . . . . . . 10 (𝜑 → 1 ∈ ℕ)
973a1i 11 . . . . . . . . . 10 (𝜑 → ∅ ∈ V)
9893, 95, 96, 97fvmptd 6327 . . . . . . . . 9 (𝜑 → (𝐹‘1) = ∅)
9998adantr 480 . . . . . . . 8 ((𝜑𝑦 = ∅) → (𝐹‘1) = ∅)
100 id 22 . . . . . . . . . 10 (𝑦 = ∅ → 𝑦 = ∅)
101100eqcomd 2657 . . . . . . . . 9 (𝑦 = ∅ → ∅ = 𝑦)
102101adantl 481 . . . . . . . 8 ((𝜑𝑦 = ∅) → ∅ = 𝑦)
10399, 102eqtr2d 2686 . . . . . . 7 ((𝜑𝑦 = ∅) → 𝑦 = (𝐹‘1))
104 fveq2 6229 . . . . . . . . 9 (𝑚 = 1 → (𝐹𝑚) = (𝐹‘1))
105104eqeq2d 2661 . . . . . . . 8 (𝑚 = 1 → (𝑦 = (𝐹𝑚) ↔ 𝑦 = (𝐹‘1)))
106105rspcev 3340 . . . . . . 7 ((1 ∈ ℕ ∧ 𝑦 = (𝐹‘1)) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
10792, 103, 106syl2anc 694 . . . . . 6 ((𝜑𝑦 = ∅) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
10886, 90, 107syl2anc 694 . . . . 5 (((𝜑𝑦 ∈ (𝑋 ∪ {∅})) ∧ ¬ 𝑦𝑋) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
10985, 108pm2.61dan 849 . . . 4 ((𝜑𝑦 ∈ (𝑋 ∪ {∅})) → ∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
110109ralrimiva 2995 . . 3 (𝜑 → ∀𝑦 ∈ (𝑋 ∪ {∅})∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚))
111 dffo3 6414 . . 3 (𝐹:ℕ–onto→(𝑋 ∪ {∅}) ↔ (𝐹:ℕ⟶(𝑋 ∪ {∅}) ∧ ∀𝑦 ∈ (𝑋 ∪ {∅})∃𝑚 ∈ ℕ 𝑦 = (𝐹𝑚)))
11225, 110, 111sylanbrc 699 . 2 (𝜑𝐹:ℕ–onto→(𝑋 ∪ {∅}))
113 animorrl 507 . . . . 5 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛 = 𝑚) → (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
1142, 3syl6eqel 2738 . . . . . . . . . . . . 13 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ V)
11524fvmpt2 6330 . . . . . . . . . . . . 13 ((𝑛 ∈ ℕ ∧ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ V) → (𝐹𝑛) = if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
116114, 115syldan 486 . . . . . . . . . . . 12 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
117116, 2eqtrd 2685 . . . . . . . . . . 11 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = ∅)
118117ineq1d 3846 . . . . . . . . . 10 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = (∅ ∩ (𝐹𝑚)))
119 0in 4002 . . . . . . . . . 10 (∅ ∩ (𝐹𝑚)) = ∅
120118, 119syl6eq 2701 . . . . . . . . 9 ((𝑛 ∈ ℕ ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
121120adantlr 751 . . . . . . . 8 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
122121ad4ant24 1327 . . . . . . 7 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
12324a1i 11 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → 𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))))
124 eqeq1 2655 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑚 → (𝑛 = 1 ↔ 𝑚 = 1))
125 oveq1 6697 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑚 → (𝑛 − 1) = (𝑚 − 1))
126125eleq1d 2715 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑚 → ((𝑛 − 1) ∈ 𝐴 ↔ (𝑚 − 1) ∈ 𝐴))
127126notbid 307 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑚 → (¬ (𝑛 − 1) ∈ 𝐴 ↔ ¬ (𝑚 − 1) ∈ 𝐴))
128124, 127orbi12d 746 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑚 → ((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ↔ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)))
129125fveq2d 6233 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑚 → (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)))
130128, 129ifbieq2d 4144 . . . . . . . . . . . . . . 15 (𝑛 = 𝑚 → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))))
131130adantl 481 . . . . . . . . . . . . . 14 (((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) ∧ 𝑛 = 𝑚) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))))
132 simpl 472 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → 𝑚 ∈ ℕ)
133 iftrue 4125 . . . . . . . . . . . . . . . 16 ((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = ∅)
134133, 3syl6eqel 2738 . . . . . . . . . . . . . . 15 ((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) ∈ V)
135134adantl 481 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) ∈ V)
136123, 131, 132, 135fvmptd 6327 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))))
137133adantl 481 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = ∅)
138136, 137eqtrd 2685 . . . . . . . . . . . 12 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = ∅)
139138ineq2d 3847 . . . . . . . . . . 11 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ((𝐹𝑛) ∩ ∅))
140 in0 4001 . . . . . . . . . . 11 ((𝐹𝑛) ∩ ∅) = ∅
141139, 140syl6eq 2701 . . . . . . . . . 10 ((𝑚 ∈ ℕ ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
142141adantll 750 . . . . . . . . 9 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
143142ad5ant25 1342 . . . . . . . 8 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
144 fvex 6239 . . . . . . . . . . . . . . . 16 (𝐺‘(𝑛 − 1)) ∈ V
1453, 144ifex 4189 . . . . . . . . . . . . . . 15 if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) ∈ V
146145, 115mpan2 707 . . . . . . . . . . . . . 14 (𝑛 ∈ ℕ → (𝐹𝑛) = if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))))
147146, 9sylan9eq 2705 . . . . . . . . . . . . 13 ((𝑛 ∈ ℕ ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = (𝐺‘(𝑛 − 1)))
148147adantlr 751 . . . . . . . . . . . 12 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → (𝐹𝑛) = (𝐺‘(𝑛 − 1)))
1491483adant3 1101 . . . . . . . . . . 11 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑛) = (𝐺‘(𝑛 − 1)))
15024a1i 11 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → 𝐹 = (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))))
151130adantl 481 . . . . . . . . . . . . . . 15 (((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) ∧ 𝑛 = 𝑚) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))))
152 iffalse 4128 . . . . . . . . . . . . . . . 16 (¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = (𝐺‘(𝑚 − 1)))
153152ad2antlr 763 . . . . . . . . . . . . . . 15 (((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) ∧ 𝑛 = 𝑚) → if((𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑚 − 1))) = (𝐺‘(𝑚 − 1)))
154151, 153eqtrd 2685 . . . . . . . . . . . . . 14 (((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) ∧ 𝑛 = 𝑚) → if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1))) = (𝐺‘(𝑚 − 1)))
155 simpl 472 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → 𝑚 ∈ ℕ)
156 fvexd 6241 . . . . . . . . . . . . . 14 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑚 − 1)) ∈ V)
157150, 154, 155, 156fvmptd 6327 . . . . . . . . . . . . 13 ((𝑚 ∈ ℕ ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = (𝐺‘(𝑚 − 1)))
158157adantll 750 . . . . . . . . . . . 12 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = (𝐺‘(𝑚 − 1)))
1591583adant2 1100 . . . . . . . . . . 11 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐹𝑚) = (𝐺‘(𝑚 − 1)))
160149, 159ineq12d 3848 . . . . . . . . . 10 (((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))))
161160ad5ant245 1344 . . . . . . . . 9 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))))
16216ad2antlr 763 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝑛 − 1) ∈ 𝐴)
163 pm2.46 412 . . . . . . . . . . . . . . 15 (¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → ¬ ¬ (𝑚 − 1) ∈ 𝐴)
164163notnotrd 128 . . . . . . . . . . . . . 14 (¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴) → (𝑚 − 1) ∈ 𝐴)
165164adantl 481 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝑚 − 1) ∈ 𝐴)
166 f1of1 6174 . . . . . . . . . . . . . . . . . 18 (𝐺:𝐴1-1-onto𝑋𝐺:𝐴1-1𝑋)
16711, 166syl 17 . . . . . . . . . . . . . . . . 17 (𝜑𝐺:𝐴1-1𝑋)
168 dff14a 6567 . . . . . . . . . . . . . . . . 17 (𝐺:𝐴1-1𝑋 ↔ (𝐺:𝐴𝑋 ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))))
169167, 168sylib 208 . . . . . . . . . . . . . . . 16 (𝜑 → (𝐺:𝐴𝑋 ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))))
170169simprd 478 . . . . . . . . . . . . . . 15 (𝜑 → ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)))
171170adantr 480 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) → ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)))
172171ad3antrrr 766 . . . . . . . . . . . . 13 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)))
173162, 165, 172jca31 556 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (((𝑛 − 1) ∈ 𝐴 ∧ (𝑚 − 1) ∈ 𝐴) ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))))
174 nncn 11066 . . . . . . . . . . . . . . . 16 (𝑛 ∈ ℕ → 𝑛 ∈ ℂ)
175174adantr 480 . . . . . . . . . . . . . . 15 ((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) → 𝑛 ∈ ℂ)
176175ad2antlr 763 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 𝑛 ∈ ℂ)
177 nncn 11066 . . . . . . . . . . . . . . . 16 (𝑚 ∈ ℕ → 𝑚 ∈ ℂ)
178177adantl 481 . . . . . . . . . . . . . . 15 ((𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ) → 𝑚 ∈ ℂ)
179178ad2antlr 763 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 𝑚 ∈ ℂ)
180 1cnd 10094 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 1 ∈ ℂ)
181 simpr 476 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → 𝑛𝑚)
182176, 179, 180, 181subneintr2d 10476 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → (𝑛 − 1) ≠ (𝑚 − 1))
183182ad2antrr 762 . . . . . . . . . . . 12 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝑛 − 1) ≠ (𝑚 − 1))
184 neeq1 2885 . . . . . . . . . . . . . 14 (𝑥 = (𝑛 − 1) → (𝑥𝑦 ↔ (𝑛 − 1) ≠ 𝑦))
185 fveq2 6229 . . . . . . . . . . . . . . 15 (𝑥 = (𝑛 − 1) → (𝐺𝑥) = (𝐺‘(𝑛 − 1)))
186185neeq1d 2882 . . . . . . . . . . . . . 14 (𝑥 = (𝑛 − 1) → ((𝐺𝑥) ≠ (𝐺𝑦) ↔ (𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦)))
187184, 186imbi12d 333 . . . . . . . . . . . . 13 (𝑥 = (𝑛 − 1) → ((𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦)) ↔ ((𝑛 − 1) ≠ 𝑦 → (𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦))))
188 neeq2 2886 . . . . . . . . . . . . . 14 (𝑦 = (𝑚 − 1) → ((𝑛 − 1) ≠ 𝑦 ↔ (𝑛 − 1) ≠ (𝑚 − 1)))
189 fveq2 6229 . . . . . . . . . . . . . . 15 (𝑦 = (𝑚 − 1) → (𝐺𝑦) = (𝐺‘(𝑚 − 1)))
190189neeq2d 2883 . . . . . . . . . . . . . 14 (𝑦 = (𝑚 − 1) → ((𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦) ↔ (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1))))
191188, 190imbi12d 333 . . . . . . . . . . . . 13 (𝑦 = (𝑚 − 1) → (((𝑛 − 1) ≠ 𝑦 → (𝐺‘(𝑛 − 1)) ≠ (𝐺𝑦)) ↔ ((𝑛 − 1) ≠ (𝑚 − 1) → (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1)))))
192187, 191rspc2va 3354 . . . . . . . . . . . 12 ((((𝑛 − 1) ∈ 𝐴 ∧ (𝑚 − 1) ∈ 𝐴) ∧ ∀𝑥𝐴𝑦𝐴 (𝑥𝑦 → (𝐺𝑥) ≠ (𝐺𝑦))) → ((𝑛 − 1) ≠ (𝑚 − 1) → (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1))))
193173, 183, 192sylc 65 . . . . . . . . . . 11 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ≠ (𝐺‘(𝑚 − 1)))
194193neneqd 2828 . . . . . . . . . 10 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ¬ (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)))
19518ad4ant13 1315 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑛 − 1)) ∈ 𝑋)
19613ffvelrnda 6399 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑚 − 1) ∈ 𝐴) → (𝐺‘(𝑚 − 1)) ∈ 𝑋)
197164, 196sylan2 490 . . . . . . . . . . . . 13 ((𝜑 ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑚 − 1)) ∈ 𝑋)
198197ad4ant14 1317 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → (𝐺‘(𝑚 − 1)) ∈ 𝑋)
199 nnfoctbdjlem.dj . . . . . . . . . . . . . 14 (𝜑Disj 𝑦𝑋 𝑦)
200 id 22 . . . . . . . . . . . . . . 15 (𝑦 = 𝑧𝑦 = 𝑧)
201200disjor 4666 . . . . . . . . . . . . . 14 (Disj 𝑦𝑋 𝑦 ↔ ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅))
202199, 201sylib 208 . . . . . . . . . . . . 13 (𝜑 → ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅))
203202ad3antrrr 766 . . . . . . . . . . . 12 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅))
204 eqeq1 2655 . . . . . . . . . . . . . 14 (𝑦 = (𝐺‘(𝑛 − 1)) → (𝑦 = 𝑧 ↔ (𝐺‘(𝑛 − 1)) = 𝑧))
205 ineq1 3840 . . . . . . . . . . . . . . 15 (𝑦 = (𝐺‘(𝑛 − 1)) → (𝑦𝑧) = ((𝐺‘(𝑛 − 1)) ∩ 𝑧))
206205eqeq1d 2653 . . . . . . . . . . . . . 14 (𝑦 = (𝐺‘(𝑛 − 1)) → ((𝑦𝑧) = ∅ ↔ ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅))
207204, 206orbi12d 746 . . . . . . . . . . . . 13 (𝑦 = (𝐺‘(𝑛 − 1)) → ((𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅) ↔ ((𝐺‘(𝑛 − 1)) = 𝑧 ∨ ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅)))
208 eqeq2 2662 . . . . . . . . . . . . . 14 (𝑧 = (𝐺‘(𝑚 − 1)) → ((𝐺‘(𝑛 − 1)) = 𝑧 ↔ (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1))))
209 ineq2 3841 . . . . . . . . . . . . . . 15 (𝑧 = (𝐺‘(𝑚 − 1)) → ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))))
210209eqeq1d 2653 . . . . . . . . . . . . . 14 (𝑧 = (𝐺‘(𝑚 − 1)) → (((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅ ↔ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
211208, 210orbi12d 746 . . . . . . . . . . . . 13 (𝑧 = (𝐺‘(𝑚 − 1)) → (((𝐺‘(𝑛 − 1)) = 𝑧 ∨ ((𝐺‘(𝑛 − 1)) ∩ 𝑧) = ∅) ↔ ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅)))
212207, 211rspc2va 3354 . . . . . . . . . . . 12 ((((𝐺‘(𝑛 − 1)) ∈ 𝑋 ∧ (𝐺‘(𝑚 − 1)) ∈ 𝑋) ∧ ∀𝑦𝑋𝑧𝑋 (𝑦 = 𝑧 ∨ (𝑦𝑧) = ∅)) → ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
213195, 198, 203, 212syl21anc 1365 . . . . . . . . . . 11 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
214213adantllr 755 . . . . . . . . . 10 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
215 orel1 396 . . . . . . . . . 10 (¬ (𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) → (((𝐺‘(𝑛 − 1)) = (𝐺‘(𝑚 − 1)) ∨ ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅) → ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅))
216194, 214, 215sylc 65 . . . . . . . . 9 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐺‘(𝑛 − 1)) ∩ (𝐺‘(𝑚 − 1))) = ∅)
217161, 216eqtrd 2685 . . . . . . . 8 (((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) ∧ ¬ (𝑚 = 1 ∨ ¬ (𝑚 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
218143, 217pm2.61dan 849 . . . . . . 7 ((((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) ∧ ¬ (𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴)) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
219122, 218pm2.61dan 849 . . . . . 6 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅)
220219olcd 407 . . . . 5 (((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) ∧ 𝑛𝑚) → (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
221113, 220pm2.61dane 2910 . . . 4 ((𝜑 ∧ (𝑛 ∈ ℕ ∧ 𝑚 ∈ ℕ)) → (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
222221ralrimivva 3000 . . 3 (𝜑 → ∀𝑛 ∈ ℕ ∀𝑚 ∈ ℕ (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
223 fveq2 6229 . . . 4 (𝑛 = 𝑚 → (𝐹𝑛) = (𝐹𝑚))
224223disjor 4666 . . 3 (Disj 𝑛 ∈ ℕ (𝐹𝑛) ↔ ∀𝑛 ∈ ℕ ∀𝑚 ∈ ℕ (𝑛 = 𝑚 ∨ ((𝐹𝑛) ∩ (𝐹𝑚)) = ∅))
225222, 224sylibr 224 . 2 (𝜑Disj 𝑛 ∈ ℕ (𝐹𝑛))
226 nnex 11064 . . . . 5 ℕ ∈ V
227226mptex 6527 . . . 4 (𝑛 ∈ ℕ ↦ if((𝑛 = 1 ∨ ¬ (𝑛 − 1) ∈ 𝐴), ∅, (𝐺‘(𝑛 − 1)))) ∈ V
22824, 227eqeltri 2726 . . 3 𝐹 ∈ V
229 foeq1 6149 . . . 4 (𝑓 = 𝐹 → (𝑓:ℕ–onto→(𝑋 ∪ {∅}) ↔ 𝐹:ℕ–onto→(𝑋 ∪ {∅})))
230 simpl 472 . . . . . 6 ((𝑓 = 𝐹𝑛 ∈ ℕ) → 𝑓 = 𝐹)
231230fveq1d 6231 . . . . 5 ((𝑓 = 𝐹𝑛 ∈ ℕ) → (𝑓𝑛) = (𝐹𝑛))
232231disjeq2dv 4657 . . . 4 (𝑓 = 𝐹 → (Disj 𝑛 ∈ ℕ (𝑓𝑛) ↔ Disj 𝑛 ∈ ℕ (𝐹𝑛)))
233229, 232anbi12d 747 . . 3 (𝑓 = 𝐹 → ((𝑓:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑓𝑛)) ↔ (𝐹:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝐹𝑛))))
234228, 233spcev 3331 . 2 ((𝐹:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝐹𝑛)) → ∃𝑓(𝑓:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑓𝑛)))
235112, 225, 234syl2anc 694 1 (𝜑 → ∃𝑓(𝑓:ℕ–onto→(𝑋 ∪ {∅}) ∧ Disj 𝑛 ∈ ℕ (𝑓𝑛)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wo 382  wa 383  w3a 1054   = wceq 1523  wex 1744  wcel 2030  wne 2823  wral 2941  wrex 2942  Vcvv 3231  cun 3605  cin 3606  wss 3607  c0 3948  ifcif 4119  {csn 4210  Disj wdisj 4652   class class class wbr 4685  cmpt 4762  ran crn 5144   Fn wfn 5921  wf 5922  1-1wf1 5923  ontowfo 5924  1-1-ontowf1o 5925  cfv 5926  (class class class)co 6690  cc 9972  1c1 9975   + caddc 9977   < clt 10112  cmin 10304  cn 11058
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1762  ax-4 1777  ax-5 1879  ax-6 1945  ax-7 1981  ax-8 2032  ax-9 2039  ax-10 2059  ax-11 2074  ax-12 2087  ax-13 2282  ax-ext 2631  ax-rep 4804  ax-sep 4814  ax-nul 4822  ax-pow 4873  ax-pr 4936  ax-un 6991  ax-cnex 10030  ax-resscn 10031  ax-1cn 10032  ax-icn 10033  ax-addcl 10034  ax-addrcl 10035  ax-mulcl 10036  ax-mulrcl 10037  ax-mulcom 10038  ax-addass 10039  ax-mulass 10040  ax-distr 10041  ax-i2m1 10042  ax-1ne0 10043  ax-1rid 10044  ax-rnegex 10045  ax-rrecex 10046  ax-cnre 10047  ax-pre-lttri 10048  ax-pre-lttrn 10049  ax-pre-ltadd 10050  ax-pre-mulgt0 10051
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3or 1055  df-3an 1056  df-tru 1526  df-ex 1745  df-nf 1750  df-sb 1938  df-eu 2502  df-mo 2503  df-clab 2638  df-cleq 2644  df-clel 2647  df-nfc 2782  df-ne 2824  df-nel 2927  df-ral 2946  df-rex 2947  df-reu 2948  df-rmo 2949  df-rab 2950  df-v 3233  df-sbc 3469  df-csb 3567  df-dif 3610  df-un 3612  df-in 3614  df-ss 3621  df-pss 3623  df-nul 3949  df-if 4120  df-pw 4193  df-sn 4211  df-pr 4213  df-tp 4215  df-op 4217  df-uni 4469  df-iun 4554  df-disj 4653  df-br 4686  df-opab 4746  df-mpt 4763  df-tr 4786  df-id 5053  df-eprel 5058  df-po 5064  df-so 5065  df-fr 5102  df-we 5104  df-xp 5149  df-rel 5150  df-cnv 5151  df-co 5152  df-dm 5153  df-rn 5154  df-res 5155  df-ima 5156  df-pred 5718  df-ord 5764  df-on 5765  df-lim 5766  df-suc 5767  df-iota 5889  df-fun 5928  df-fn 5929  df-f 5930  df-f1 5931  df-fo 5932  df-f1o 5933  df-fv 5934  df-riota 6651  df-ov 6693  df-oprab 6694  df-mpt2 6695  df-om 7108  df-wrecs 7452  df-recs 7513  df-rdg 7551  df-er 7787  df-en 7998  df-dom 7999  df-sdom 8000  df-pnf 10114  df-mnf 10115  df-xr 10116  df-ltxr 10117  df-le 10118  df-sub 10306  df-neg 10307  df-nn 11059  df-rp 11871
This theorem is referenced by:  nnfoctbdj  40991
  Copyright terms: Public domain W3C validator