MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  axdc4lem Structured version   Visualization version   GIF version

Theorem axdc4lem 9871
Description: Lemma for axdc4 9872. (Contributed by Mario Carneiro, 31-Jan-2013.) (Revised by Mario Carneiro, 16-Nov-2013.)
Hypotheses
Ref Expression
axdc4lem.1 𝐴 ∈ V
axdc4lem.2 𝐺 = (𝑛 ∈ ω, 𝑥𝐴 ↦ ({suc 𝑛} × (𝑛𝐹𝑥)))
Assertion
Ref Expression
axdc4lem ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))))
Distinct variable groups:   𝑔,𝑘,𝑛,𝑥,𝐴   𝐶,𝑔,𝑘   𝑔,𝐹,𝑛,𝑥   𝑘,𝐺
Allowed substitution hints:   𝐶(𝑥,𝑛)   𝐹(𝑘)   𝐺(𝑥,𝑔,𝑛)

Proof of Theorem axdc4lem
Dummy variables 𝑖 𝑚 𝑠 𝑡 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 peano1 7595 . . . 4 ∅ ∈ ω
2 opelxpi 5586 . . . 4 ((∅ ∈ ω ∧ 𝐶𝐴) → ⟨∅, 𝐶⟩ ∈ (ω × 𝐴))
31, 2mpan 688 . . 3 (𝐶𝐴 → ⟨∅, 𝐶⟩ ∈ (ω × 𝐴))
4 simp2 1133 . . . . . . . 8 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → 𝑛 ∈ ω)
5 fovrn 7312 . . . . . . . 8 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → (𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅}))
6 peano2 7596 . . . . . . . . . . 11 (𝑛 ∈ ω → suc 𝑛 ∈ ω)
76snssd 4735 . . . . . . . . . 10 (𝑛 ∈ ω → {suc 𝑛} ⊆ ω)
8 eldifi 4102 . . . . . . . . . 10 ((𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅}) → (𝑛𝐹𝑥) ∈ 𝒫 𝐴)
9 axdc4lem.1 . . . . . . . . . . . 12 𝐴 ∈ V
109elpw2 5240 . . . . . . . . . . 11 ((𝑛𝐹𝑥) ∈ 𝒫 𝐴 ↔ (𝑛𝐹𝑥) ⊆ 𝐴)
11 xpss12 5564 . . . . . . . . . . 11 (({suc 𝑛} ⊆ ω ∧ (𝑛𝐹𝑥) ⊆ 𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
1210, 11sylan2b 595 . . . . . . . . . 10 (({suc 𝑛} ⊆ ω ∧ (𝑛𝐹𝑥) ∈ 𝒫 𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
137, 8, 12syl2an 597 . . . . . . . . 9 ((𝑛 ∈ ω ∧ (𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅})) → ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
14 snex 5323 . . . . . . . . . . 11 {suc 𝑛} ∈ V
15 ovex 7183 . . . . . . . . . . 11 (𝑛𝐹𝑥) ∈ V
1614, 15xpex 7470 . . . . . . . . . 10 ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ V
1716elpw 4545 . . . . . . . . 9 (({suc 𝑛} × (𝑛𝐹𝑥)) ∈ 𝒫 (ω × 𝐴) ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
1813, 17sylibr 236 . . . . . . . 8 ((𝑛 ∈ ω ∧ (𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅})) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ 𝒫 (ω × 𝐴))
194, 5, 18syl2anc 586 . . . . . . 7 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ 𝒫 (ω × 𝐴))
20 eldifn 4103 . . . . . . . 8 ((𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅}) → ¬ (𝑛𝐹𝑥) ∈ {∅})
2115elsn 4575 . . . . . . . . . . 11 ((𝑛𝐹𝑥) ∈ {∅} ↔ (𝑛𝐹𝑥) = ∅)
2221necon3bbii 3063 . . . . . . . . . 10 (¬ (𝑛𝐹𝑥) ∈ {∅} ↔ (𝑛𝐹𝑥) ≠ ∅)
23 vex 3497 . . . . . . . . . . . . 13 𝑛 ∈ V
2423sucex 7520 . . . . . . . . . . . 12 suc 𝑛 ∈ V
2524snnz 4704 . . . . . . . . . . 11 {suc 𝑛} ≠ ∅
26 xpnz 6010 . . . . . . . . . . . 12 (({suc 𝑛} ≠ ∅ ∧ (𝑛𝐹𝑥) ≠ ∅) ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
2726biimpi 218 . . . . . . . . . . 11 (({suc 𝑛} ≠ ∅ ∧ (𝑛𝐹𝑥) ≠ ∅) → ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
2825, 27mpan 688 . . . . . . . . . 10 ((𝑛𝐹𝑥) ≠ ∅ → ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
2922, 28sylbi 219 . . . . . . . . 9 (¬ (𝑛𝐹𝑥) ∈ {∅} → ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
3016elsn 4575 . . . . . . . . . 10 (({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅} ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) = ∅)
3130necon3bbii 3063 . . . . . . . . 9 (¬ ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅} ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
3229, 31sylibr 236 . . . . . . . 8 (¬ (𝑛𝐹𝑥) ∈ {∅} → ¬ ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅})
335, 20, 323syl 18 . . . . . . 7 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → ¬ ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅})
3419, 33eldifd 3946 . . . . . 6 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅}))
35343expib 1118 . . . . 5 (𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) → ((𝑛 ∈ ω ∧ 𝑥𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅})))
3635ralrimivv 3190 . . . 4 (𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) → ∀𝑛 ∈ ω ∀𝑥𝐴 ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅}))
37 axdc4lem.2 . . . . 5 𝐺 = (𝑛 ∈ ω, 𝑥𝐴 ↦ ({suc 𝑛} × (𝑛𝐹𝑥)))
3837fmpo 7760 . . . 4 (∀𝑛 ∈ ω ∀𝑥𝐴 ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅}) ↔ 𝐺:(ω × 𝐴)⟶(𝒫 (ω × 𝐴) ∖ {∅}))
3936, 38sylib 220 . . 3 (𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) → 𝐺:(ω × 𝐴)⟶(𝒫 (ω × 𝐴) ∖ {∅}))
40 dcomex 9863 . . . . 5 ω ∈ V
4140, 9xpex 7470 . . . 4 (ω × 𝐴) ∈ V
4241axdc3 9870 . . 3 ((⟨∅, 𝐶⟩ ∈ (ω × 𝐴) ∧ 𝐺:(ω × 𝐴)⟶(𝒫 (ω × 𝐴) ∖ {∅})) → ∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))))
433, 39, 42syl2an 597 . 2 ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → ∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))))
44 2ndcof 7714 . . . . . . . . 9 (:ω⟶(ω × 𝐴) → (2nd):ω⟶𝐴)
45443ad2ant1 1129 . . . . . . . 8 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (2nd):ω⟶𝐴)
4645adantl 484 . . . . . . 7 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (2nd):ω⟶𝐴)
47 fex2 7632 . . . . . . . 8 (((2nd):ω⟶𝐴 ∧ ω ∈ V ∧ 𝐴 ∈ V) → (2nd) ∈ V)
4840, 9, 47mp3an23 1449 . . . . . . 7 ((2nd):ω⟶𝐴 → (2nd) ∈ V)
4946, 48syl 17 . . . . . 6 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (2nd) ∈ V)
50 fvco3 6754 . . . . . . . . . . 11 ((:ω⟶(ω × 𝐴) ∧ ∅ ∈ ω) → ((2nd)‘∅) = (2nd ‘(‘∅)))
511, 50mpan2 689 . . . . . . . . . 10 (:ω⟶(ω × 𝐴) → ((2nd)‘∅) = (2nd ‘(‘∅)))
52513ad2ant1 1129 . . . . . . . . 9 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ((2nd)‘∅) = (2nd ‘(‘∅)))
53 fveq2 6664 . . . . . . . . . 10 ((‘∅) = ⟨∅, 𝐶⟩ → (2nd ‘(‘∅)) = (2nd ‘⟨∅, 𝐶⟩))
54533ad2ant2 1130 . . . . . . . . 9 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (2nd ‘(‘∅)) = (2nd ‘⟨∅, 𝐶⟩))
5552, 54eqtrd 2856 . . . . . . . 8 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ((2nd)‘∅) = (2nd ‘⟨∅, 𝐶⟩))
56 op2ndg 7696 . . . . . . . . 9 ((∅ ∈ ω ∧ 𝐶𝐴) → (2nd ‘⟨∅, 𝐶⟩) = 𝐶)
571, 56mpan 688 . . . . . . . 8 (𝐶𝐴 → (2nd ‘⟨∅, 𝐶⟩) = 𝐶)
5855, 57sylan9eqr 2878 . . . . . . 7 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ((2nd)‘∅) = 𝐶)
59 nfv 1911 . . . . . . . . 9 𝑘 𝐶𝐴
60 nfv 1911 . . . . . . . . . 10 𝑘 :ω⟶(ω × 𝐴)
61 nfv 1911 . . . . . . . . . 10 𝑘(‘∅) = ⟨∅, 𝐶
62 nfra1 3219 . . . . . . . . . 10 𝑘𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))
6360, 61, 62nf3an 1898 . . . . . . . . 9 𝑘(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
6459, 63nfan 1896 . . . . . . . 8 𝑘(𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))))
65 fveq2 6664 . . . . . . . . . . . . . . . . 17 (𝑚 = ∅ → (𝑚) = (‘∅))
66 opeq1 4796 . . . . . . . . . . . . . . . . 17 (𝑚 = ∅ → ⟨𝑚, 𝑧⟩ = ⟨∅, 𝑧⟩)
6765, 66eqeq12d 2837 . . . . . . . . . . . . . . . 16 (𝑚 = ∅ → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (‘∅) = ⟨∅, 𝑧⟩))
6867exbidv 1918 . . . . . . . . . . . . . . 15 (𝑚 = ∅ → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(‘∅) = ⟨∅, 𝑧⟩))
69 fveq2 6664 . . . . . . . . . . . . . . . . 17 (𝑚 = 𝑖 → (𝑚) = (𝑖))
70 opeq1 4796 . . . . . . . . . . . . . . . . 17 (𝑚 = 𝑖 → ⟨𝑚, 𝑧⟩ = ⟨𝑖, 𝑧⟩)
7169, 70eqeq12d 2837 . . . . . . . . . . . . . . . 16 (𝑚 = 𝑖 → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (𝑖) = ⟨𝑖, 𝑧⟩))
7271exbidv 1918 . . . . . . . . . . . . . . 15 (𝑚 = 𝑖 → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩))
73 fveq2 6664 . . . . . . . . . . . . . . . . 17 (𝑚 = suc 𝑖 → (𝑚) = (‘suc 𝑖))
74 opeq1 4796 . . . . . . . . . . . . . . . . 17 (𝑚 = suc 𝑖 → ⟨𝑚, 𝑧⟩ = ⟨suc 𝑖, 𝑧⟩)
7573, 74eqeq12d 2837 . . . . . . . . . . . . . . . 16 (𝑚 = suc 𝑖 → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩))
7675exbidv 1918 . . . . . . . . . . . . . . 15 (𝑚 = suc 𝑖 → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩))
77 opeq2 4797 . . . . . . . . . . . . . . . . . . 19 (𝑧 = 𝐶 → ⟨∅, 𝑧⟩ = ⟨∅, 𝐶⟩)
7877eqeq2d 2832 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝐶 → ((‘∅) = ⟨∅, 𝑧⟩ ↔ (‘∅) = ⟨∅, 𝐶⟩))
7978spcegv 3596 . . . . . . . . . . . . . . . . 17 (𝐶𝐴 → ((‘∅) = ⟨∅, 𝐶⟩ → ∃𝑧(‘∅) = ⟨∅, 𝑧⟩))
8079imp 409 . . . . . . . . . . . . . . . 16 ((𝐶𝐴 ∧ (‘∅) = ⟨∅, 𝐶⟩) → ∃𝑧(‘∅) = ⟨∅, 𝑧⟩)
81803ad2antr2 1185 . . . . . . . . . . . . . . 15 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∃𝑧(‘∅) = ⟨∅, 𝑧⟩)
82 fveq2 6664 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑖) = ⟨𝑖, 𝑧⟩ → (𝐺‘(𝑖)) = (𝐺‘⟨𝑖, 𝑧⟩))
83 df-ov 7153 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑖𝐺𝑧) = (𝐺‘⟨𝑖, 𝑧⟩)
8482, 83syl6eqr 2874 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑖) = ⟨𝑖, 𝑧⟩ → (𝐺‘(𝑖)) = (𝑖𝐺𝑧))
8584adantl 484 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (𝐺‘(𝑖)) = (𝑖𝐺𝑧))
86 simplr 767 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → 𝑖 ∈ ω)
87 ffvelrn 6843 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (𝑖) ∈ (ω × 𝐴))
88 eleq1 2900 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑖) = ⟨𝑖, 𝑧⟩ → ((𝑖) ∈ (ω × 𝐴) ↔ ⟨𝑖, 𝑧⟩ ∈ (ω × 𝐴)))
89 opelxp2 5591 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (⟨𝑖, 𝑧⟩ ∈ (ω × 𝐴) → 𝑧𝐴)
9088, 89syl6bi 255 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑖) = ⟨𝑖, 𝑧⟩ → ((𝑖) ∈ (ω × 𝐴) → 𝑧𝐴))
9187, 90mpan9 509 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → 𝑧𝐴)
92 suceq 6250 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑛 = 𝑖 → suc 𝑛 = suc 𝑖)
9392sneqd 4572 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 = 𝑖 → {suc 𝑛} = {suc 𝑖})
94 oveq1 7157 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 = 𝑖 → (𝑛𝐹𝑥) = (𝑖𝐹𝑥))
9593, 94xpeq12d 5580 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑛 = 𝑖 → ({suc 𝑛} × (𝑛𝐹𝑥)) = ({suc 𝑖} × (𝑖𝐹𝑥)))
96 oveq2 7158 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑥 = 𝑧 → (𝑖𝐹𝑥) = (𝑖𝐹𝑧))
9796xpeq2d 5579 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑥 = 𝑧 → ({suc 𝑖} × (𝑖𝐹𝑥)) = ({suc 𝑖} × (𝑖𝐹𝑧)))
98 snex 5323 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 {suc 𝑖} ∈ V
99 ovex 7183 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑖𝐹𝑧) ∈ V
10098, 99xpex 7470 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ({suc 𝑖} × (𝑖𝐹𝑧)) ∈ V
10195, 97, 37, 100ovmpo 7304 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑖 ∈ ω ∧ 𝑧𝐴) → (𝑖𝐺𝑧) = ({suc 𝑖} × (𝑖𝐹𝑧)))
10286, 91, 101syl2anc 586 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (𝑖𝐺𝑧) = ({suc 𝑖} × (𝑖𝐹𝑧)))
10385, 102eqtrd 2856 . . . . . . . . . . . . . . . . . . . . . . . 24 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (𝐺‘(𝑖)) = ({suc 𝑖} × (𝑖𝐹𝑧)))
104 suceq 6250 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑘 = 𝑖 → suc 𝑘 = suc 𝑖)
105104fveq2d 6668 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 = 𝑖 → (‘suc 𝑘) = (‘suc 𝑖))
106 2fveq3 6669 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 = 𝑖 → (𝐺‘(𝑘)) = (𝐺‘(𝑖)))
107105, 106eleq12d 2907 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑘 = 𝑖 → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) ↔ (‘suc 𝑖) ∈ (𝐺‘(𝑖))))
108107rspcv 3617 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 ∈ ω → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (‘suc 𝑖) ∈ (𝐺‘(𝑖))))
109108ad2antlr 725 . . . . . . . . . . . . . . . . . . . . . . . 24 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (‘suc 𝑖) ∈ (𝐺‘(𝑖))))
110 eleq2 2901 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐺‘(𝑖)) = ({suc 𝑖} × (𝑖𝐹𝑧)) → ((‘suc 𝑖) ∈ (𝐺‘(𝑖)) ↔ (‘suc 𝑖) ∈ ({suc 𝑖} × (𝑖𝐹𝑧))))
111 elxp 5572 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((‘suc 𝑖) ∈ ({suc 𝑖} × (𝑖𝐹𝑧)) ↔ ∃𝑠𝑡((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))))
112 velsn 4576 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑠 ∈ {suc 𝑖} ↔ 𝑠 = suc 𝑖)
113 opeq1 4796 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑠 = suc 𝑖 → ⟨𝑠, 𝑡⟩ = ⟨suc 𝑖, 𝑡⟩)
114112, 113sylbi 219 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑠 ∈ {suc 𝑖} → ⟨𝑠, 𝑡⟩ = ⟨suc 𝑖, 𝑡⟩)
115114eqeq2d 2832 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑠 ∈ {suc 𝑖} → ((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ↔ (‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩))
116115biimpac 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ 𝑠 ∈ {suc 𝑖}) → (‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
117116adantrr 715 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))) → (‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
118117eximi 1831 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (∃𝑡((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
119118exlimiv 1927 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (∃𝑠𝑡((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
120111, 119sylbi 219 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((‘suc 𝑖) ∈ ({suc 𝑖} × (𝑖𝐹𝑧)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
121110, 120syl6bi 255 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐺‘(𝑖)) = ({suc 𝑖} × (𝑖𝐹𝑧)) → ((‘suc 𝑖) ∈ (𝐺‘(𝑖)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩))
122103, 109, 121sylsyld 61 . . . . . . . . . . . . . . . . . . . . . . 23 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩))
123122expcom 416 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖) = ⟨𝑖, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)))
124123exlimiv 1927 . . . . . . . . . . . . . . . . . . . . 21 (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)))
125124com3l 89 . . . . . . . . . . . . . . . . . . . 20 ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)))
126 opeq2 4797 . . . . . . . . . . . . . . . . . . . . . 22 (𝑡 = 𝑧 → ⟨suc 𝑖, 𝑡⟩ = ⟨suc 𝑖, 𝑧⟩)
127126eqeq2d 2832 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 = 𝑧 → ((‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩ ↔ (‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩))
128127cbvexvw 2040 . . . . . . . . . . . . . . . . . . . 20 (∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩ ↔ ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)
129125, 128syl8ib 258 . . . . . . . . . . . . . . . . . . 19 ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
130129impancom 454 . . . . . . . . . . . . . . . . . 18 ((:ω⟶(ω × 𝐴) ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (𝑖 ∈ ω → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
1311303adant2 1127 . . . . . . . . . . . . . . . . 17 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (𝑖 ∈ ω → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
132131adantl 484 . . . . . . . . . . . . . . . 16 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑖 ∈ ω → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
133132com12 32 . . . . . . . . . . . . . . 15 (𝑖 ∈ ω → ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
13468, 72, 76, 81, 133finds2 7604 . . . . . . . . . . . . . 14 (𝑚 ∈ ω → ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩))
135134com12 32 . . . . . . . . . . . . 13 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑚 ∈ ω → ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩))
136135ralrimiv 3181 . . . . . . . . . . . 12 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∀𝑚 ∈ ω ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩)
137 fveq2 6664 . . . . . . . . . . . . . . 15 (𝑚 = 𝑘 → (𝑚) = (𝑘))
138 opeq1 4796 . . . . . . . . . . . . . . 15 (𝑚 = 𝑘 → ⟨𝑚, 𝑧⟩ = ⟨𝑘, 𝑧⟩)
139137, 138eqeq12d 2837 . . . . . . . . . . . . . 14 (𝑚 = 𝑘 → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (𝑘) = ⟨𝑘, 𝑧⟩))
140139exbidv 1918 . . . . . . . . . . . . 13 (𝑚 = 𝑘 → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩))
141140rspccv 3619 . . . . . . . . . . . 12 (∀𝑚 ∈ ω ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ → (𝑘 ∈ ω → ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩))
142136, 141syl 17 . . . . . . . . . . 11 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑘 ∈ ω → ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩))
1431423impia 1113 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩)
144 simp21 1202 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → :ω⟶(ω × 𝐴))
145 simp3 1134 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → 𝑘 ∈ ω)
146 rspa 3206 . . . . . . . . . . . 12 ((∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) ∧ 𝑘 ∈ ω) → (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
1471463ad2antl3 1183 . . . . . . . . . . 11 (((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
1481473adant1 1126 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
149 simpl 485 . . . . . . . . . . . . . . . . 17 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝑘) = ⟨𝑘, 𝑧⟩)
150149fveq2d 6668 . . . . . . . . . . . . . . . 16 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝐺‘(𝑘)) = (𝐺‘⟨𝑘, 𝑧⟩))
151 simprr 771 . . . . . . . . . . . . . . . . 17 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → 𝑘 ∈ ω)
152 eleq1 2900 . . . . . . . . . . . . . . . . . . 19 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((𝑘) ∈ (ω × 𝐴) ↔ ⟨𝑘, 𝑧⟩ ∈ (ω × 𝐴)))
153 opelxp2 5591 . . . . . . . . . . . . . . . . . . 19 (⟨𝑘, 𝑧⟩ ∈ (ω × 𝐴) → 𝑧𝐴)
154152, 153syl6bi 255 . . . . . . . . . . . . . . . . . 18 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((𝑘) ∈ (ω × 𝐴) → 𝑧𝐴))
155 ffvelrn 6843 . . . . . . . . . . . . . . . . . 18 ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → (𝑘) ∈ (ω × 𝐴))
156154, 155impel 508 . . . . . . . . . . . . . . . . 17 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → 𝑧𝐴)
157 df-ov 7153 . . . . . . . . . . . . . . . . . 18 (𝑘𝐺𝑧) = (𝐺‘⟨𝑘, 𝑧⟩)
158 suceq 6250 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑘 → suc 𝑛 = suc 𝑘)
159158sneqd 4572 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑘 → {suc 𝑛} = {suc 𝑘})
160 oveq1 7157 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑘 → (𝑛𝐹𝑥) = (𝑘𝐹𝑥))
161159, 160xpeq12d 5580 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑘 → ({suc 𝑛} × (𝑛𝐹𝑥)) = ({suc 𝑘} × (𝑘𝐹𝑥)))
162 oveq2 7158 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = 𝑧 → (𝑘𝐹𝑥) = (𝑘𝐹𝑧))
163162xpeq2d 5579 . . . . . . . . . . . . . . . . . . 19 (𝑥 = 𝑧 → ({suc 𝑘} × (𝑘𝐹𝑥)) = ({suc 𝑘} × (𝑘𝐹𝑧)))
164 snex 5323 . . . . . . . . . . . . . . . . . . . 20 {suc 𝑘} ∈ V
165 ovex 7183 . . . . . . . . . . . . . . . . . . . 20 (𝑘𝐹𝑧) ∈ V
166164, 165xpex 7470 . . . . . . . . . . . . . . . . . . 19 ({suc 𝑘} × (𝑘𝐹𝑧)) ∈ V
167161, 163, 37, 166ovmpo 7304 . . . . . . . . . . . . . . . . . 18 ((𝑘 ∈ ω ∧ 𝑧𝐴) → (𝑘𝐺𝑧) = ({suc 𝑘} × (𝑘𝐹𝑧)))
168157, 167syl5eqr 2870 . . . . . . . . . . . . . . . . 17 ((𝑘 ∈ ω ∧ 𝑧𝐴) → (𝐺‘⟨𝑘, 𝑧⟩) = ({suc 𝑘} × (𝑘𝐹𝑧)))
169151, 156, 168syl2anc 586 . . . . . . . . . . . . . . . 16 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝐺‘⟨𝑘, 𝑧⟩) = ({suc 𝑘} × (𝑘𝐹𝑧)))
170150, 169eqtrd 2856 . . . . . . . . . . . . . . 15 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝐺‘(𝑘)) = ({suc 𝑘} × (𝑘𝐹𝑧)))
171170eleq2d 2898 . . . . . . . . . . . . . 14 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) ↔ (‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧))))
172 elxp 5572 . . . . . . . . . . . . . . . . 17 ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) ↔ ∃𝑠𝑡((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧))))
173 peano2 7596 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 ∈ ω → suc 𝑘 ∈ ω)
174 fvco3 6754 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((:ω⟶(ω × 𝐴) ∧ suc 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) = (2nd ‘(‘suc 𝑘)))
175173, 174sylan2 594 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) = (2nd ‘(‘suc 𝑘)))
176175adantl 484 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) = (2nd ‘(‘suc 𝑘)))
177 simpll 765 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (‘suc 𝑘) = ⟨𝑠, 𝑡⟩)
178177fveq2d 6668 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (2nd ‘(‘suc 𝑘)) = (2nd ‘⟨𝑠, 𝑡⟩))
179176, 178eqtrd 2856 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) = (2nd ‘⟨𝑠, 𝑡⟩))
180 vex 3497 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑠 ∈ V
181 vex 3497 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑡 ∈ V
182180, 181op2nd 7692 . . . . . . . . . . . . . . . . . . . . . . . 24 (2nd ‘⟨𝑠, 𝑡⟩) = 𝑡
183179, 182syl6eq 2872 . . . . . . . . . . . . . . . . . . . . . . 23 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) = 𝑡)
184 fvco3 6754 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘𝑘) = (2nd ‘(𝑘)))
185184adantl 484 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘𝑘) = (2nd ‘(𝑘)))
186 simplr 767 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝑘) = ⟨𝑘, 𝑧⟩)
187186fveq2d 6668 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (2nd ‘(𝑘)) = (2nd ‘⟨𝑘, 𝑧⟩))
188185, 187eqtrd 2856 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘𝑘) = (2nd ‘⟨𝑘, 𝑧⟩))
189 vex 3497 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑘 ∈ V
190 vex 3497 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑧 ∈ V
191189, 190op2nd 7692 . . . . . . . . . . . . . . . . . . . . . . . . 25 (2nd ‘⟨𝑘, 𝑧⟩) = 𝑧
192188, 191syl6eq 2872 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘𝑘) = 𝑧)
193192oveq2d 7166 . . . . . . . . . . . . . . . . . . . . . . 23 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝑘𝐹((2nd)‘𝑘)) = (𝑘𝐹𝑧))
194183, 193eleq12d 2907 . . . . . . . . . . . . . . . . . . . . . 22 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)) ↔ 𝑡 ∈ (𝑘𝐹𝑧)))
195194biimprcd 252 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 ∈ (𝑘𝐹𝑧) → ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
196195exp4c 435 . . . . . . . . . . . . . . . . . . . 20 (𝑡 ∈ (𝑘𝐹𝑧) → ((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))))
197196adantl 484 . . . . . . . . . . . . . . . . . . 19 ((𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧)) → ((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))))
198197impcom 410 . . . . . . . . . . . . . . . . . 18 (((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧))) → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
199198exlimivv 1929 . . . . . . . . . . . . . . . . 17 (∃𝑠𝑡((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧))) → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
200172, 199sylbi 219 . . . . . . . . . . . . . . . 16 ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
201200com3l 89 . . . . . . . . . . . . . . 15 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
202201imp 409 . . . . . . . . . . . . . 14 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
203171, 202sylbid 242 . . . . . . . . . . . . 13 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
204203ex 415 . . . . . . . . . . . 12 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
205204exlimiv 1927 . . . . . . . . . . 11 (∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
2062053imp 1107 . . . . . . . . . 10 ((∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) ∧ (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))
207143, 144, 145, 148, 206syl121anc 1371 . . . . . . . . 9 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))
2082073expia 1117 . . . . . . . 8 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑘 ∈ ω → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
20964, 208ralrimi 3216 . . . . . . 7 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))
21046, 58, 2093jca 1124 . . . . . 6 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ((2nd):ω⟶𝐴 ∧ ((2nd)‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
211 feq1 6489 . . . . . . 7 (𝑔 = (2nd) → (𝑔:ω⟶𝐴 ↔ (2nd):ω⟶𝐴))
212 fveq1 6663 . . . . . . . 8 (𝑔 = (2nd) → (𝑔‘∅) = ((2nd)‘∅))
213212eqeq1d 2823 . . . . . . 7 (𝑔 = (2nd) → ((𝑔‘∅) = 𝐶 ↔ ((2nd)‘∅) = 𝐶))
214 fveq1 6663 . . . . . . . . 9 (𝑔 = (2nd) → (𝑔‘suc 𝑘) = ((2nd)‘suc 𝑘))
215 fveq1 6663 . . . . . . . . . 10 (𝑔 = (2nd) → (𝑔𝑘) = ((2nd)‘𝑘))
216215oveq2d 7166 . . . . . . . . 9 (𝑔 = (2nd) → (𝑘𝐹(𝑔𝑘)) = (𝑘𝐹((2nd)‘𝑘)))
217214, 216eleq12d 2907 . . . . . . . 8 (𝑔 = (2nd) → ((𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)) ↔ ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
218217ralbidv 3197 . . . . . . 7 (𝑔 = (2nd) → (∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)) ↔ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
219211, 213, 2183anbi123d 1432 . . . . . 6 (𝑔 = (2nd) → ((𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))) ↔ ((2nd):ω⟶𝐴 ∧ ((2nd)‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
22049, 210, 219spcedv 3598 . . . . 5 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))))
221220ex 415 . . . 4 (𝐶𝐴 → ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
222221exlimdv 1930 . . 3 (𝐶𝐴 → (∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
223222adantr 483 . 2 ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → (∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
22443, 223mpd 15 1 ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 398  w3a 1083   = wceq 1533  wex 1776  wcel 2110  wne 3016  wral 3138  Vcvv 3494  cdif 3932  wss 3935  c0 4290  𝒫 cpw 4538  {csn 4560  cop 4566   × cxp 5547  ccom 5553  suc csuc 6187  wf 6345  cfv 6349  (class class class)co 7150  cmpo 7152  ωcom 7574  2nd c2nd 7682
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1907  ax-6 1966  ax-7 2011  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2157  ax-12 2173  ax-ext 2793  ax-sep 5195  ax-nul 5202  ax-pow 5258  ax-pr 5321  ax-un 7455  ax-dc 9862
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1536  df-ex 1777  df-nf 1781  df-sb 2066  df-mo 2618  df-eu 2650  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-reu 3145  df-rab 3147  df-v 3496  df-sbc 3772  df-csb 3883  df-dif 3938  df-un 3940  df-in 3942  df-ss 3951  df-pss 3953  df-nul 4291  df-if 4467  df-pw 4540  df-sn 4561  df-pr 4563  df-tp 4565  df-op 4567  df-uni 4832  df-iun 4913  df-br 5059  df-opab 5121  df-mpt 5139  df-tr 5165  df-id 5454  df-eprel 5459  df-po 5468  df-so 5469  df-fr 5508  df-we 5510  df-xp 5555  df-rel 5556  df-cnv 5557  df-co 5558  df-dm 5559  df-rn 5560  df-res 5561  df-ima 5562  df-ord 6188  df-on 6189  df-lim 6190  df-suc 6191  df-iota 6308  df-fun 6351  df-fn 6352  df-f 6353  df-f1 6354  df-fo 6355  df-f1o 6356  df-fv 6357  df-ov 7153  df-oprab 7154  df-mpo 7155  df-om 7575  df-1st 7683  df-2nd 7684  df-1o 8096
This theorem is referenced by:  axdc4  9872
  Copyright terms: Public domain W3C validator