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

Theorem axdc4lem 9865
Description: Lemma for axdc4 9866. (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 7590 . . . 4 ∅ ∈ ω
2 opelxpi 5585 . . . 4 ((∅ ∈ ω ∧ 𝐶𝐴) → ⟨∅, 𝐶⟩ ∈ (ω × 𝐴))
31, 2mpan 686 . . 3 (𝐶𝐴 → ⟨∅, 𝐶⟩ ∈ (ω × 𝐴))
4 simp2 1129 . . . . . . . 8 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → 𝑛 ∈ ω)
5 fovrn 7307 . . . . . . . 8 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → (𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅}))
6 peano2 7591 . . . . . . . . . . 11 (𝑛 ∈ ω → suc 𝑛 ∈ ω)
76snssd 4734 . . . . . . . . . 10 (𝑛 ∈ ω → {suc 𝑛} ⊆ ω)
8 eldifi 4100 . . . . . . . . . 10 ((𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅}) → (𝑛𝐹𝑥) ∈ 𝒫 𝐴)
9 axdc4lem.1 . . . . . . . . . . . 12 𝐴 ∈ V
109elpw2 5239 . . . . . . . . . . 11 ((𝑛𝐹𝑥) ∈ 𝒫 𝐴 ↔ (𝑛𝐹𝑥) ⊆ 𝐴)
11 xpss12 5563 . . . . . . . . . . 11 (({suc 𝑛} ⊆ ω ∧ (𝑛𝐹𝑥) ⊆ 𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
1210, 11sylan2b 593 . . . . . . . . . 10 (({suc 𝑛} ⊆ ω ∧ (𝑛𝐹𝑥) ∈ 𝒫 𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
137, 8, 12syl2an 595 . . . . . . . . 9 ((𝑛 ∈ ω ∧ (𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅})) → ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
14 snex 5322 . . . . . . . . . . 11 {suc 𝑛} ∈ V
15 ovex 7178 . . . . . . . . . . 11 (𝑛𝐹𝑥) ∈ V
1614, 15xpex 7465 . . . . . . . . . 10 ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ V
1716elpw 4542 . . . . . . . . 9 (({suc 𝑛} × (𝑛𝐹𝑥)) ∈ 𝒫 (ω × 𝐴) ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
1813, 17sylibr 235 . . . . . . . 8 ((𝑛 ∈ ω ∧ (𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅})) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ 𝒫 (ω × 𝐴))
194, 5, 18syl2anc 584 . . . . . . 7 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ 𝒫 (ω × 𝐴))
20 eldifn 4101 . . . . . . . 8 ((𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅}) → ¬ (𝑛𝐹𝑥) ∈ {∅})
2115elsn 4572 . . . . . . . . . . 11 ((𝑛𝐹𝑥) ∈ {∅} ↔ (𝑛𝐹𝑥) = ∅)
2221necon3bbii 3060 . . . . . . . . . 10 (¬ (𝑛𝐹𝑥) ∈ {∅} ↔ (𝑛𝐹𝑥) ≠ ∅)
23 vex 3495 . . . . . . . . . . . . 13 𝑛 ∈ V
2423sucex 7515 . . . . . . . . . . . 12 suc 𝑛 ∈ V
2524snnz 4703 . . . . . . . . . . 11 {suc 𝑛} ≠ ∅
26 xpnz 6009 . . . . . . . . . . . 12 (({suc 𝑛} ≠ ∅ ∧ (𝑛𝐹𝑥) ≠ ∅) ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
2726biimpi 217 . . . . . . . . . . 11 (({suc 𝑛} ≠ ∅ ∧ (𝑛𝐹𝑥) ≠ ∅) → ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
2825, 27mpan 686 . . . . . . . . . 10 ((𝑛𝐹𝑥) ≠ ∅ → ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
2922, 28sylbi 218 . . . . . . . . 9 (¬ (𝑛𝐹𝑥) ∈ {∅} → ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
3016elsn 4572 . . . . . . . . . 10 (({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅} ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) = ∅)
3130necon3bbii 3060 . . . . . . . . 9 (¬ ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅} ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
3229, 31sylibr 235 . . . . . . . 8 (¬ (𝑛𝐹𝑥) ∈ {∅} → ¬ ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅})
335, 20, 323syl 18 . . . . . . 7 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → ¬ ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅})
3419, 33eldifd 3944 . . . . . 6 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅}))
35343expib 1114 . . . . 5 (𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) → ((𝑛 ∈ ω ∧ 𝑥𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅})))
3635ralrimivv 3187 . . . 4 (𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) → ∀𝑛 ∈ ω ∀𝑥𝐴 ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅}))
37 axdc4lem.2 . . . . 5 𝐺 = (𝑛 ∈ ω, 𝑥𝐴 ↦ ({suc 𝑛} × (𝑛𝐹𝑥)))
3837fmpo 7755 . . . 4 (∀𝑛 ∈ ω ∀𝑥𝐴 ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅}) ↔ 𝐺:(ω × 𝐴)⟶(𝒫 (ω × 𝐴) ∖ {∅}))
3936, 38sylib 219 . . 3 (𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) → 𝐺:(ω × 𝐴)⟶(𝒫 (ω × 𝐴) ∖ {∅}))
40 dcomex 9857 . . . . 5 ω ∈ V
4140, 9xpex 7465 . . . 4 (ω × 𝐴) ∈ V
4241axdc3 9864 . . 3 ((⟨∅, 𝐶⟩ ∈ (ω × 𝐴) ∧ 𝐺:(ω × 𝐴)⟶(𝒫 (ω × 𝐴) ∖ {∅})) → ∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))))
433, 39, 42syl2an 595 . 2 ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → ∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))))
44 2ndcof 7709 . . . . . . . . 9 (:ω⟶(ω × 𝐴) → (2nd):ω⟶𝐴)
45443ad2ant1 1125 . . . . . . . 8 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (2nd):ω⟶𝐴)
4645adantl 482 . . . . . . 7 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (2nd):ω⟶𝐴)
47 fex2 7627 . . . . . . . 8 (((2nd):ω⟶𝐴 ∧ ω ∈ V ∧ 𝐴 ∈ V) → (2nd) ∈ V)
4840, 9, 47mp3an23 1444 . . . . . . 7 ((2nd):ω⟶𝐴 → (2nd) ∈ V)
4946, 48syl 17 . . . . . 6 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (2nd) ∈ V)
50 fvco3 6753 . . . . . . . . . . 11 ((:ω⟶(ω × 𝐴) ∧ ∅ ∈ ω) → ((2nd)‘∅) = (2nd ‘(‘∅)))
511, 50mpan2 687 . . . . . . . . . 10 (:ω⟶(ω × 𝐴) → ((2nd)‘∅) = (2nd ‘(‘∅)))
52513ad2ant1 1125 . . . . . . . . 9 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ((2nd)‘∅) = (2nd ‘(‘∅)))
53 fveq2 6663 . . . . . . . . . 10 ((‘∅) = ⟨∅, 𝐶⟩ → (2nd ‘(‘∅)) = (2nd ‘⟨∅, 𝐶⟩))
54533ad2ant2 1126 . . . . . . . . 9 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (2nd ‘(‘∅)) = (2nd ‘⟨∅, 𝐶⟩))
5552, 54eqtrd 2853 . . . . . . . 8 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ((2nd)‘∅) = (2nd ‘⟨∅, 𝐶⟩))
56 op2ndg 7691 . . . . . . . . 9 ((∅ ∈ ω ∧ 𝐶𝐴) → (2nd ‘⟨∅, 𝐶⟩) = 𝐶)
571, 56mpan 686 . . . . . . . 8 (𝐶𝐴 → (2nd ‘⟨∅, 𝐶⟩) = 𝐶)
5855, 57sylan9eqr 2875 . . . . . . 7 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ((2nd)‘∅) = 𝐶)
59 nfv 1906 . . . . . . . . 9 𝑘 𝐶𝐴
60 nfv 1906 . . . . . . . . . 10 𝑘 :ω⟶(ω × 𝐴)
61 nfv 1906 . . . . . . . . . 10 𝑘(‘∅) = ⟨∅, 𝐶
62 nfra1 3216 . . . . . . . . . 10 𝑘𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))
6360, 61, 62nf3an 1893 . . . . . . . . 9 𝑘(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
6459, 63nfan 1891 . . . . . . . 8 𝑘(𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))))
65 fveq2 6663 . . . . . . . . . . . . . . . . 17 (𝑚 = ∅ → (𝑚) = (‘∅))
66 opeq1 4795 . . . . . . . . . . . . . . . . 17 (𝑚 = ∅ → ⟨𝑚, 𝑧⟩ = ⟨∅, 𝑧⟩)
6765, 66eqeq12d 2834 . . . . . . . . . . . . . . . 16 (𝑚 = ∅ → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (‘∅) = ⟨∅, 𝑧⟩))
6867exbidv 1913 . . . . . . . . . . . . . . 15 (𝑚 = ∅ → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(‘∅) = ⟨∅, 𝑧⟩))
69 fveq2 6663 . . . . . . . . . . . . . . . . 17 (𝑚 = 𝑖 → (𝑚) = (𝑖))
70 opeq1 4795 . . . . . . . . . . . . . . . . 17 (𝑚 = 𝑖 → ⟨𝑚, 𝑧⟩ = ⟨𝑖, 𝑧⟩)
7169, 70eqeq12d 2834 . . . . . . . . . . . . . . . 16 (𝑚 = 𝑖 → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (𝑖) = ⟨𝑖, 𝑧⟩))
7271exbidv 1913 . . . . . . . . . . . . . . 15 (𝑚 = 𝑖 → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩))
73 fveq2 6663 . . . . . . . . . . . . . . . . 17 (𝑚 = suc 𝑖 → (𝑚) = (‘suc 𝑖))
74 opeq1 4795 . . . . . . . . . . . . . . . . 17 (𝑚 = suc 𝑖 → ⟨𝑚, 𝑧⟩ = ⟨suc 𝑖, 𝑧⟩)
7573, 74eqeq12d 2834 . . . . . . . . . . . . . . . 16 (𝑚 = suc 𝑖 → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩))
7675exbidv 1913 . . . . . . . . . . . . . . 15 (𝑚 = suc 𝑖 → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩))
77 opeq2 4796 . . . . . . . . . . . . . . . . . . 19 (𝑧 = 𝐶 → ⟨∅, 𝑧⟩ = ⟨∅, 𝐶⟩)
7877eqeq2d 2829 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝐶 → ((‘∅) = ⟨∅, 𝑧⟩ ↔ (‘∅) = ⟨∅, 𝐶⟩))
7978spcegv 3594 . . . . . . . . . . . . . . . . 17 (𝐶𝐴 → ((‘∅) = ⟨∅, 𝐶⟩ → ∃𝑧(‘∅) = ⟨∅, 𝑧⟩))
8079imp 407 . . . . . . . . . . . . . . . 16 ((𝐶𝐴 ∧ (‘∅) = ⟨∅, 𝐶⟩) → ∃𝑧(‘∅) = ⟨∅, 𝑧⟩)
81803ad2antr2 1181 . . . . . . . . . . . . . . 15 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∃𝑧(‘∅) = ⟨∅, 𝑧⟩)
82 fveq2 6663 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑖) = ⟨𝑖, 𝑧⟩ → (𝐺‘(𝑖)) = (𝐺‘⟨𝑖, 𝑧⟩))
83 df-ov 7148 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑖𝐺𝑧) = (𝐺‘⟨𝑖, 𝑧⟩)
8482, 83syl6eqr 2871 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑖) = ⟨𝑖, 𝑧⟩ → (𝐺‘(𝑖)) = (𝑖𝐺𝑧))
8584adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (𝐺‘(𝑖)) = (𝑖𝐺𝑧))
86 simplr 765 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → 𝑖 ∈ ω)
87 ffvelrn 6841 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (𝑖) ∈ (ω × 𝐴))
88 eleq1 2897 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑖) = ⟨𝑖, 𝑧⟩ → ((𝑖) ∈ (ω × 𝐴) ↔ ⟨𝑖, 𝑧⟩ ∈ (ω × 𝐴)))
89 opelxp2 5590 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (⟨𝑖, 𝑧⟩ ∈ (ω × 𝐴) → 𝑧𝐴)
9088, 89syl6bi 254 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑖) = ⟨𝑖, 𝑧⟩ → ((𝑖) ∈ (ω × 𝐴) → 𝑧𝐴))
9187, 90mpan9 507 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → 𝑧𝐴)
92 suceq 6249 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑛 = 𝑖 → suc 𝑛 = suc 𝑖)
9392sneqd 4569 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 = 𝑖 → {suc 𝑛} = {suc 𝑖})
94 oveq1 7152 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 = 𝑖 → (𝑛𝐹𝑥) = (𝑖𝐹𝑥))
9593, 94xpeq12d 5579 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑛 = 𝑖 → ({suc 𝑛} × (𝑛𝐹𝑥)) = ({suc 𝑖} × (𝑖𝐹𝑥)))
96 oveq2 7153 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑥 = 𝑧 → (𝑖𝐹𝑥) = (𝑖𝐹𝑧))
9796xpeq2d 5578 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑥 = 𝑧 → ({suc 𝑖} × (𝑖𝐹𝑥)) = ({suc 𝑖} × (𝑖𝐹𝑧)))
98 snex 5322 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 {suc 𝑖} ∈ V
99 ovex 7178 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑖𝐹𝑧) ∈ V
10098, 99xpex 7465 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ({suc 𝑖} × (𝑖𝐹𝑧)) ∈ V
10195, 97, 37, 100ovmpo 7299 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑖 ∈ ω ∧ 𝑧𝐴) → (𝑖𝐺𝑧) = ({suc 𝑖} × (𝑖𝐹𝑧)))
10286, 91, 101syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (𝑖𝐺𝑧) = ({suc 𝑖} × (𝑖𝐹𝑧)))
10385, 102eqtrd 2853 . . . . . . . . . . . . . . . . . . . . . . . 24 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (𝐺‘(𝑖)) = ({suc 𝑖} × (𝑖𝐹𝑧)))
104 suceq 6249 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑘 = 𝑖 → suc 𝑘 = suc 𝑖)
105104fveq2d 6667 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 = 𝑖 → (‘suc 𝑘) = (‘suc 𝑖))
106 2fveq3 6668 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 = 𝑖 → (𝐺‘(𝑘)) = (𝐺‘(𝑖)))
107105, 106eleq12d 2904 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑘 = 𝑖 → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) ↔ (‘suc 𝑖) ∈ (𝐺‘(𝑖))))
108107rspcv 3615 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 ∈ ω → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (‘suc 𝑖) ∈ (𝐺‘(𝑖))))
109108ad2antlr 723 . . . . . . . . . . . . . . . . . . . . . . . 24 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (‘suc 𝑖) ∈ (𝐺‘(𝑖))))
110 eleq2 2898 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐺‘(𝑖)) = ({suc 𝑖} × (𝑖𝐹𝑧)) → ((‘suc 𝑖) ∈ (𝐺‘(𝑖)) ↔ (‘suc 𝑖) ∈ ({suc 𝑖} × (𝑖𝐹𝑧))))
111 elxp 5571 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((‘suc 𝑖) ∈ ({suc 𝑖} × (𝑖𝐹𝑧)) ↔ ∃𝑠𝑡((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))))
112 velsn 4573 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑠 ∈ {suc 𝑖} ↔ 𝑠 = suc 𝑖)
113 opeq1 4795 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑠 = suc 𝑖 → ⟨𝑠, 𝑡⟩ = ⟨suc 𝑖, 𝑡⟩)
114112, 113sylbi 218 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑠 ∈ {suc 𝑖} → ⟨𝑠, 𝑡⟩ = ⟨suc 𝑖, 𝑡⟩)
115114eqeq2d 2829 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑠 ∈ {suc 𝑖} → ((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ↔ (‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩))
116115biimpac 479 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ 𝑠 ∈ {suc 𝑖}) → (‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
117116adantrr 713 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))) → (‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
118117eximi 1826 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (∃𝑡((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
119118exlimiv 1922 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (∃𝑠𝑡((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
120111, 119sylbi 218 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((‘suc 𝑖) ∈ ({suc 𝑖} × (𝑖𝐹𝑧)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
121110, 120syl6bi 254 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐺‘(𝑖)) = ({suc 𝑖} × (𝑖𝐹𝑧)) → ((‘suc 𝑖) ∈ (𝐺‘(𝑖)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩))
122103, 109, 121sylsyld 61 . . . . . . . . . . . . . . . . . . . . . . 23 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩))
123122expcom 414 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖) = ⟨𝑖, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)))
124123exlimiv 1922 . . . . . . . . . . . . . . . . . . . . 21 (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)))
125124com3l 89 . . . . . . . . . . . . . . . . . . . 20 ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)))
126 opeq2 4796 . . . . . . . . . . . . . . . . . . . . . 22 (𝑡 = 𝑧 → ⟨suc 𝑖, 𝑡⟩ = ⟨suc 𝑖, 𝑧⟩)
127126eqeq2d 2829 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 = 𝑧 → ((‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩ ↔ (‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩))
128127cbvexvw 2035 . . . . . . . . . . . . . . . . . . . 20 (∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩ ↔ ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)
129125, 128syl8ib 257 . . . . . . . . . . . . . . . . . . 19 ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
130129impancom 452 . . . . . . . . . . . . . . . . . 18 ((:ω⟶(ω × 𝐴) ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (𝑖 ∈ ω → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
1311303adant2 1123 . . . . . . . . . . . . . . . . 17 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (𝑖 ∈ ω → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
132131adantl 482 . . . . . . . . . . . . . . . 16 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑖 ∈ ω → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
133132com12 32 . . . . . . . . . . . . . . 15 (𝑖 ∈ ω → ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
13468, 72, 76, 81, 133finds2 7599 . . . . . . . . . . . . . 14 (𝑚 ∈ ω → ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩))
135134com12 32 . . . . . . . . . . . . 13 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑚 ∈ ω → ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩))
136135ralrimiv 3178 . . . . . . . . . . . 12 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∀𝑚 ∈ ω ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩)
137 fveq2 6663 . . . . . . . . . . . . . . 15 (𝑚 = 𝑘 → (𝑚) = (𝑘))
138 opeq1 4795 . . . . . . . . . . . . . . 15 (𝑚 = 𝑘 → ⟨𝑚, 𝑧⟩ = ⟨𝑘, 𝑧⟩)
139137, 138eqeq12d 2834 . . . . . . . . . . . . . 14 (𝑚 = 𝑘 → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (𝑘) = ⟨𝑘, 𝑧⟩))
140139exbidv 1913 . . . . . . . . . . . . 13 (𝑚 = 𝑘 → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩))
141140rspccv 3617 . . . . . . . . . . . 12 (∀𝑚 ∈ ω ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ → (𝑘 ∈ ω → ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩))
142136, 141syl 17 . . . . . . . . . . 11 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑘 ∈ ω → ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩))
1431423impia 1109 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩)
144 simp21 1198 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → :ω⟶(ω × 𝐴))
145 simp3 1130 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → 𝑘 ∈ ω)
146 rspa 3203 . . . . . . . . . . . 12 ((∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) ∧ 𝑘 ∈ ω) → (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
1471463ad2antl3 1179 . . . . . . . . . . 11 (((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
1481473adant1 1122 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
149 simpl 483 . . . . . . . . . . . . . . . . 17 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝑘) = ⟨𝑘, 𝑧⟩)
150149fveq2d 6667 . . . . . . . . . . . . . . . 16 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝐺‘(𝑘)) = (𝐺‘⟨𝑘, 𝑧⟩))
151 simprr 769 . . . . . . . . . . . . . . . . 17 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → 𝑘 ∈ ω)
152 eleq1 2897 . . . . . . . . . . . . . . . . . . 19 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((𝑘) ∈ (ω × 𝐴) ↔ ⟨𝑘, 𝑧⟩ ∈ (ω × 𝐴)))
153 opelxp2 5590 . . . . . . . . . . . . . . . . . . 19 (⟨𝑘, 𝑧⟩ ∈ (ω × 𝐴) → 𝑧𝐴)
154152, 153syl6bi 254 . . . . . . . . . . . . . . . . . 18 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((𝑘) ∈ (ω × 𝐴) → 𝑧𝐴))
155 ffvelrn 6841 . . . . . . . . . . . . . . . . . 18 ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → (𝑘) ∈ (ω × 𝐴))
156154, 155impel 506 . . . . . . . . . . . . . . . . 17 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → 𝑧𝐴)
157 df-ov 7148 . . . . . . . . . . . . . . . . . 18 (𝑘𝐺𝑧) = (𝐺‘⟨𝑘, 𝑧⟩)
158 suceq 6249 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑘 → suc 𝑛 = suc 𝑘)
159158sneqd 4569 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑘 → {suc 𝑛} = {suc 𝑘})
160 oveq1 7152 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑘 → (𝑛𝐹𝑥) = (𝑘𝐹𝑥))
161159, 160xpeq12d 5579 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑘 → ({suc 𝑛} × (𝑛𝐹𝑥)) = ({suc 𝑘} × (𝑘𝐹𝑥)))
162 oveq2 7153 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = 𝑧 → (𝑘𝐹𝑥) = (𝑘𝐹𝑧))
163162xpeq2d 5578 . . . . . . . . . . . . . . . . . . 19 (𝑥 = 𝑧 → ({suc 𝑘} × (𝑘𝐹𝑥)) = ({suc 𝑘} × (𝑘𝐹𝑧)))
164 snex 5322 . . . . . . . . . . . . . . . . . . . 20 {suc 𝑘} ∈ V
165 ovex 7178 . . . . . . . . . . . . . . . . . . . 20 (𝑘𝐹𝑧) ∈ V
166164, 165xpex 7465 . . . . . . . . . . . . . . . . . . 19 ({suc 𝑘} × (𝑘𝐹𝑧)) ∈ V
167161, 163, 37, 166ovmpo 7299 . . . . . . . . . . . . . . . . . 18 ((𝑘 ∈ ω ∧ 𝑧𝐴) → (𝑘𝐺𝑧) = ({suc 𝑘} × (𝑘𝐹𝑧)))
168157, 167syl5eqr 2867 . . . . . . . . . . . . . . . . 17 ((𝑘 ∈ ω ∧ 𝑧𝐴) → (𝐺‘⟨𝑘, 𝑧⟩) = ({suc 𝑘} × (𝑘𝐹𝑧)))
169151, 156, 168syl2anc 584 . . . . . . . . . . . . . . . 16 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝐺‘⟨𝑘, 𝑧⟩) = ({suc 𝑘} × (𝑘𝐹𝑧)))
170150, 169eqtrd 2853 . . . . . . . . . . . . . . 15 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝐺‘(𝑘)) = ({suc 𝑘} × (𝑘𝐹𝑧)))
171170eleq2d 2895 . . . . . . . . . . . . . 14 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) ↔ (‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧))))
172 elxp 5571 . . . . . . . . . . . . . . . . 17 ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) ↔ ∃𝑠𝑡((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧))))
173 peano2 7591 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 ∈ ω → suc 𝑘 ∈ ω)
174 fvco3 6753 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((:ω⟶(ω × 𝐴) ∧ suc 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) = (2nd ‘(‘suc 𝑘)))
175173, 174sylan2 592 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) = (2nd ‘(‘suc 𝑘)))
176175adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) = (2nd ‘(‘suc 𝑘)))
177 simpll 763 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (‘suc 𝑘) = ⟨𝑠, 𝑡⟩)
178177fveq2d 6667 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (2nd ‘(‘suc 𝑘)) = (2nd ‘⟨𝑠, 𝑡⟩))
179176, 178eqtrd 2853 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) = (2nd ‘⟨𝑠, 𝑡⟩))
180 vex 3495 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑠 ∈ V
181 vex 3495 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑡 ∈ V
182180, 181op2nd 7687 . . . . . . . . . . . . . . . . . . . . . . . 24 (2nd ‘⟨𝑠, 𝑡⟩) = 𝑡
183179, 182syl6eq 2869 . . . . . . . . . . . . . . . . . . . . . . 23 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) = 𝑡)
184 fvco3 6753 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘𝑘) = (2nd ‘(𝑘)))
185184adantl 482 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘𝑘) = (2nd ‘(𝑘)))
186 simplr 765 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝑘) = ⟨𝑘, 𝑧⟩)
187186fveq2d 6667 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (2nd ‘(𝑘)) = (2nd ‘⟨𝑘, 𝑧⟩))
188185, 187eqtrd 2853 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘𝑘) = (2nd ‘⟨𝑘, 𝑧⟩))
189 vex 3495 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑘 ∈ V
190 vex 3495 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑧 ∈ V
191189, 190op2nd 7687 . . . . . . . . . . . . . . . . . . . . . . . . 25 (2nd ‘⟨𝑘, 𝑧⟩) = 𝑧
192188, 191syl6eq 2869 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘𝑘) = 𝑧)
193192oveq2d 7161 . . . . . . . . . . . . . . . . . . . . . . 23 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝑘𝐹((2nd)‘𝑘)) = (𝑘𝐹𝑧))
194183, 193eleq12d 2904 . . . . . . . . . . . . . . . . . . . . . 22 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)) ↔ 𝑡 ∈ (𝑘𝐹𝑧)))
195194biimprcd 251 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 ∈ (𝑘𝐹𝑧) → ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
196195exp4c 433 . . . . . . . . . . . . . . . . . . . 20 (𝑡 ∈ (𝑘𝐹𝑧) → ((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))))
197196adantl 482 . . . . . . . . . . . . . . . . . . 19 ((𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧)) → ((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))))
198197impcom 408 . . . . . . . . . . . . . . . . . 18 (((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧))) → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
199198exlimivv 1924 . . . . . . . . . . . . . . . . 17 (∃𝑠𝑡((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧))) → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
200172, 199sylbi 218 . . . . . . . . . . . . . . . 16 ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
201200com3l 89 . . . . . . . . . . . . . . 15 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
202201imp 407 . . . . . . . . . . . . . 14 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
203171, 202sylbid 241 . . . . . . . . . . . . 13 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
204203ex 413 . . . . . . . . . . . 12 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
205204exlimiv 1922 . . . . . . . . . . 11 (∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
2062053imp 1103 . . . . . . . . . 10 ((∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) ∧ (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))
207143, 144, 145, 148, 206syl121anc 1367 . . . . . . . . 9 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))
2082073expia 1113 . . . . . . . 8 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑘 ∈ ω → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
20964, 208ralrimi 3213 . . . . . . 7 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))
21046, 58, 2093jca 1120 . . . . . 6 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ((2nd):ω⟶𝐴 ∧ ((2nd)‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
211 feq1 6488 . . . . . . 7 (𝑔 = (2nd) → (𝑔:ω⟶𝐴 ↔ (2nd):ω⟶𝐴))
212 fveq1 6662 . . . . . . . 8 (𝑔 = (2nd) → (𝑔‘∅) = ((2nd)‘∅))
213212eqeq1d 2820 . . . . . . 7 (𝑔 = (2nd) → ((𝑔‘∅) = 𝐶 ↔ ((2nd)‘∅) = 𝐶))
214 fveq1 6662 . . . . . . . . 9 (𝑔 = (2nd) → (𝑔‘suc 𝑘) = ((2nd)‘suc 𝑘))
215 fveq1 6662 . . . . . . . . . 10 (𝑔 = (2nd) → (𝑔𝑘) = ((2nd)‘𝑘))
216215oveq2d 7161 . . . . . . . . 9 (𝑔 = (2nd) → (𝑘𝐹(𝑔𝑘)) = (𝑘𝐹((2nd)‘𝑘)))
217214, 216eleq12d 2904 . . . . . . . 8 (𝑔 = (2nd) → ((𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)) ↔ ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
218217ralbidv 3194 . . . . . . 7 (𝑔 = (2nd) → (∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)) ↔ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
219211, 213, 2183anbi123d 1427 . . . . . 6 (𝑔 = (2nd) → ((𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))) ↔ ((2nd):ω⟶𝐴 ∧ ((2nd)‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
22049, 210, 219spcedv 3596 . . . . 5 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))))
221220ex 413 . . . 4 (𝐶𝐴 → ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
222221exlimdv 1925 . . 3 (𝐶𝐴 → (∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
223222adantr 481 . 2 ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → (∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
22443, 223mpd 15 1 ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396  w3a 1079   = wceq 1528  wex 1771  wcel 2105  wne 3013  wral 3135  Vcvv 3492  cdif 3930  wss 3933  c0 4288  𝒫 cpw 4535  {csn 4557  cop 4563   × cxp 5546  ccom 5552  suc csuc 6186  wf 6344  cfv 6348  (class class class)co 7145  cmpo 7147  ωcom 7569  2nd c2nd 7677
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1787  ax-4 1801  ax-5 1902  ax-6 1961  ax-7 2006  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2151  ax-12 2167  ax-ext 2790  ax-sep 5194  ax-nul 5201  ax-pow 5257  ax-pr 5320  ax-un 7450  ax-dc 9856
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 842  df-3or 1080  df-3an 1081  df-tru 1531  df-ex 1772  df-nf 1776  df-sb 2061  df-mo 2615  df-eu 2647  df-clab 2797  df-cleq 2811  df-clel 2890  df-nfc 2960  df-ne 3014  df-ral 3140  df-rex 3141  df-reu 3142  df-rab 3144  df-v 3494  df-sbc 3770  df-csb 3881  df-dif 3936  df-un 3938  df-in 3940  df-ss 3949  df-pss 3951  df-nul 4289  df-if 4464  df-pw 4537  df-sn 4558  df-pr 4560  df-tp 4562  df-op 4564  df-uni 4831  df-iun 4912  df-br 5058  df-opab 5120  df-mpt 5138  df-tr 5164  df-id 5453  df-eprel 5458  df-po 5467  df-so 5468  df-fr 5507  df-we 5509  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-res 5560  df-ima 5561  df-ord 6187  df-on 6188  df-lim 6189  df-suc 6190  df-iota 6307  df-fun 6350  df-fn 6351  df-f 6352  df-f1 6353  df-fo 6354  df-f1o 6355  df-fv 6356  df-ov 7148  df-oprab 7149  df-mpo 7150  df-om 7570  df-1st 7678  df-2nd 7679  df-1o 8091
This theorem is referenced by:  axdc4  9866
  Copyright terms: Public domain W3C validator