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

Theorem axdc4lem 10142
Description: Lemma for axdc4 10143. (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 7710 . . . 4 ∅ ∈ ω
2 opelxpi 5617 . . . 4 ((∅ ∈ ω ∧ 𝐶𝐴) → ⟨∅, 𝐶⟩ ∈ (ω × 𝐴))
31, 2mpan 686 . . 3 (𝐶𝐴 → ⟨∅, 𝐶⟩ ∈ (ω × 𝐴))
4 simp2 1135 . . . . . . . 8 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → 𝑛 ∈ ω)
5 fovrn 7420 . . . . . . . 8 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → (𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅}))
6 peano2 7711 . . . . . . . . . . 11 (𝑛 ∈ ω → suc 𝑛 ∈ ω)
76snssd 4739 . . . . . . . . . 10 (𝑛 ∈ ω → {suc 𝑛} ⊆ ω)
8 eldifi 4057 . . . . . . . . . 10 ((𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅}) → (𝑛𝐹𝑥) ∈ 𝒫 𝐴)
9 axdc4lem.1 . . . . . . . . . . . 12 𝐴 ∈ V
109elpw2 5264 . . . . . . . . . . 11 ((𝑛𝐹𝑥) ∈ 𝒫 𝐴 ↔ (𝑛𝐹𝑥) ⊆ 𝐴)
11 xpss12 5595 . . . . . . . . . . 11 (({suc 𝑛} ⊆ ω ∧ (𝑛𝐹𝑥) ⊆ 𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
1210, 11sylan2b 593 . . . . . . . . . 10 (({suc 𝑛} ⊆ ω ∧ (𝑛𝐹𝑥) ∈ 𝒫 𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
137, 8, 12syl2an 595 . . . . . . . . 9 ((𝑛 ∈ ω ∧ (𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅})) → ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
14 snex 5349 . . . . . . . . . . 11 {suc 𝑛} ∈ V
15 ovex 7288 . . . . . . . . . . 11 (𝑛𝐹𝑥) ∈ V
1614, 15xpex 7581 . . . . . . . . . 10 ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ V
1716elpw 4534 . . . . . . . . 9 (({suc 𝑛} × (𝑛𝐹𝑥)) ∈ 𝒫 (ω × 𝐴) ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
1813, 17sylibr 233 . . . . . . . 8 ((𝑛 ∈ ω ∧ (𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅})) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ 𝒫 (ω × 𝐴))
194, 5, 18syl2anc 583 . . . . . . 7 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ 𝒫 (ω × 𝐴))
20 eldifn 4058 . . . . . . . 8 ((𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅}) → ¬ (𝑛𝐹𝑥) ∈ {∅})
2115elsn 4573 . . . . . . . . . . 11 ((𝑛𝐹𝑥) ∈ {∅} ↔ (𝑛𝐹𝑥) = ∅)
2221necon3bbii 2990 . . . . . . . . . 10 (¬ (𝑛𝐹𝑥) ∈ {∅} ↔ (𝑛𝐹𝑥) ≠ ∅)
23 vex 3426 . . . . . . . . . . . . 13 𝑛 ∈ V
2423sucex 7633 . . . . . . . . . . . 12 suc 𝑛 ∈ V
2524snnz 4709 . . . . . . . . . . 11 {suc 𝑛} ≠ ∅
26 xpnz 6051 . . . . . . . . . . . 12 (({suc 𝑛} ≠ ∅ ∧ (𝑛𝐹𝑥) ≠ ∅) ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
2726biimpi 215 . . . . . . . . . . 11 (({suc 𝑛} ≠ ∅ ∧ (𝑛𝐹𝑥) ≠ ∅) → ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
2825, 27mpan 686 . . . . . . . . . 10 ((𝑛𝐹𝑥) ≠ ∅ → ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
2922, 28sylbi 216 . . . . . . . . 9 (¬ (𝑛𝐹𝑥) ∈ {∅} → ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
3016elsn 4573 . . . . . . . . . 10 (({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅} ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) = ∅)
3130necon3bbii 2990 . . . . . . . . 9 (¬ ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅} ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
3229, 31sylibr 233 . . . . . . . 8 (¬ (𝑛𝐹𝑥) ∈ {∅} → ¬ ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅})
335, 20, 323syl 18 . . . . . . 7 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → ¬ ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅})
3419, 33eldifd 3894 . . . . . 6 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅}))
35343expib 1120 . . . . 5 (𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) → ((𝑛 ∈ ω ∧ 𝑥𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅})))
3635ralrimivv 3113 . . . 4 (𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) → ∀𝑛 ∈ ω ∀𝑥𝐴 ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅}))
37 axdc4lem.2 . . . . 5 𝐺 = (𝑛 ∈ ω, 𝑥𝐴 ↦ ({suc 𝑛} × (𝑛𝐹𝑥)))
3837fmpo 7881 . . . 4 (∀𝑛 ∈ ω ∀𝑥𝐴 ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅}) ↔ 𝐺:(ω × 𝐴)⟶(𝒫 (ω × 𝐴) ∖ {∅}))
3936, 38sylib 217 . . 3 (𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) → 𝐺:(ω × 𝐴)⟶(𝒫 (ω × 𝐴) ∖ {∅}))
40 dcomex 10134 . . . . 5 ω ∈ V
4140, 9xpex 7581 . . . 4 (ω × 𝐴) ∈ V
4241axdc3 10141 . . 3 ((⟨∅, 𝐶⟩ ∈ (ω × 𝐴) ∧ 𝐺:(ω × 𝐴)⟶(𝒫 (ω × 𝐴) ∖ {∅})) → ∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))))
433, 39, 42syl2an 595 . 2 ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → ∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))))
44 2ndcof 7835 . . . . . . . . 9 (:ω⟶(ω × 𝐴) → (2nd):ω⟶𝐴)
45443ad2ant1 1131 . . . . . . . 8 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (2nd):ω⟶𝐴)
4645adantl 481 . . . . . . 7 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (2nd):ω⟶𝐴)
47 fex2 7754 . . . . . . . 8 (((2nd):ω⟶𝐴 ∧ ω ∈ V ∧ 𝐴 ∈ V) → (2nd) ∈ V)
4840, 9, 47mp3an23 1451 . . . . . . 7 ((2nd):ω⟶𝐴 → (2nd) ∈ V)
4946, 48syl 17 . . . . . 6 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (2nd) ∈ V)
50 fvco3 6849 . . . . . . . . . . 11 ((:ω⟶(ω × 𝐴) ∧ ∅ ∈ ω) → ((2nd)‘∅) = (2nd ‘(‘∅)))
511, 50mpan2 687 . . . . . . . . . 10 (:ω⟶(ω × 𝐴) → ((2nd)‘∅) = (2nd ‘(‘∅)))
52513ad2ant1 1131 . . . . . . . . 9 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ((2nd)‘∅) = (2nd ‘(‘∅)))
53 fveq2 6756 . . . . . . . . . 10 ((‘∅) = ⟨∅, 𝐶⟩ → (2nd ‘(‘∅)) = (2nd ‘⟨∅, 𝐶⟩))
54533ad2ant2 1132 . . . . . . . . 9 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (2nd ‘(‘∅)) = (2nd ‘⟨∅, 𝐶⟩))
5552, 54eqtrd 2778 . . . . . . . 8 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ((2nd)‘∅) = (2nd ‘⟨∅, 𝐶⟩))
56 op2ndg 7817 . . . . . . . . 9 ((∅ ∈ ω ∧ 𝐶𝐴) → (2nd ‘⟨∅, 𝐶⟩) = 𝐶)
571, 56mpan 686 . . . . . . . 8 (𝐶𝐴 → (2nd ‘⟨∅, 𝐶⟩) = 𝐶)
5855, 57sylan9eqr 2801 . . . . . . 7 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ((2nd)‘∅) = 𝐶)
59 nfv 1918 . . . . . . . . 9 𝑘 𝐶𝐴
60 nfv 1918 . . . . . . . . . 10 𝑘 :ω⟶(ω × 𝐴)
61 nfv 1918 . . . . . . . . . 10 𝑘(‘∅) = ⟨∅, 𝐶
62 nfra1 3142 . . . . . . . . . 10 𝑘𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))
6360, 61, 62nf3an 1905 . . . . . . . . 9 𝑘(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
6459, 63nfan 1903 . . . . . . . 8 𝑘(𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))))
65 fveq2 6756 . . . . . . . . . . . . . . . . 17 (𝑚 = ∅ → (𝑚) = (‘∅))
66 opeq1 4801 . . . . . . . . . . . . . . . . 17 (𝑚 = ∅ → ⟨𝑚, 𝑧⟩ = ⟨∅, 𝑧⟩)
6765, 66eqeq12d 2754 . . . . . . . . . . . . . . . 16 (𝑚 = ∅ → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (‘∅) = ⟨∅, 𝑧⟩))
6867exbidv 1925 . . . . . . . . . . . . . . 15 (𝑚 = ∅ → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(‘∅) = ⟨∅, 𝑧⟩))
69 fveq2 6756 . . . . . . . . . . . . . . . . 17 (𝑚 = 𝑖 → (𝑚) = (𝑖))
70 opeq1 4801 . . . . . . . . . . . . . . . . 17 (𝑚 = 𝑖 → ⟨𝑚, 𝑧⟩ = ⟨𝑖, 𝑧⟩)
7169, 70eqeq12d 2754 . . . . . . . . . . . . . . . 16 (𝑚 = 𝑖 → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (𝑖) = ⟨𝑖, 𝑧⟩))
7271exbidv 1925 . . . . . . . . . . . . . . 15 (𝑚 = 𝑖 → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩))
73 fveq2 6756 . . . . . . . . . . . . . . . . 17 (𝑚 = suc 𝑖 → (𝑚) = (‘suc 𝑖))
74 opeq1 4801 . . . . . . . . . . . . . . . . 17 (𝑚 = suc 𝑖 → ⟨𝑚, 𝑧⟩ = ⟨suc 𝑖, 𝑧⟩)
7573, 74eqeq12d 2754 . . . . . . . . . . . . . . . 16 (𝑚 = suc 𝑖 → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩))
7675exbidv 1925 . . . . . . . . . . . . . . 15 (𝑚 = suc 𝑖 → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩))
77 opeq2 4802 . . . . . . . . . . . . . . . . . . 19 (𝑧 = 𝐶 → ⟨∅, 𝑧⟩ = ⟨∅, 𝐶⟩)
7877eqeq2d 2749 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝐶 → ((‘∅) = ⟨∅, 𝑧⟩ ↔ (‘∅) = ⟨∅, 𝐶⟩))
7978spcegv 3526 . . . . . . . . . . . . . . . . 17 (𝐶𝐴 → ((‘∅) = ⟨∅, 𝐶⟩ → ∃𝑧(‘∅) = ⟨∅, 𝑧⟩))
8079imp 406 . . . . . . . . . . . . . . . 16 ((𝐶𝐴 ∧ (‘∅) = ⟨∅, 𝐶⟩) → ∃𝑧(‘∅) = ⟨∅, 𝑧⟩)
81803ad2antr2 1187 . . . . . . . . . . . . . . 15 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∃𝑧(‘∅) = ⟨∅, 𝑧⟩)
82 fveq2 6756 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑖) = ⟨𝑖, 𝑧⟩ → (𝐺‘(𝑖)) = (𝐺‘⟨𝑖, 𝑧⟩))
83 df-ov 7258 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑖𝐺𝑧) = (𝐺‘⟨𝑖, 𝑧⟩)
8482, 83eqtr4di 2797 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑖) = ⟨𝑖, 𝑧⟩ → (𝐺‘(𝑖)) = (𝑖𝐺𝑧))
8584adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (𝐺‘(𝑖)) = (𝑖𝐺𝑧))
86 simplr 765 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → 𝑖 ∈ ω)
87 ffvelrn 6941 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (𝑖) ∈ (ω × 𝐴))
88 eleq1 2826 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑖) = ⟨𝑖, 𝑧⟩ → ((𝑖) ∈ (ω × 𝐴) ↔ ⟨𝑖, 𝑧⟩ ∈ (ω × 𝐴)))
89 opelxp2 5622 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (⟨𝑖, 𝑧⟩ ∈ (ω × 𝐴) → 𝑧𝐴)
9088, 89syl6bi 252 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑖) = ⟨𝑖, 𝑧⟩ → ((𝑖) ∈ (ω × 𝐴) → 𝑧𝐴))
9187, 90mpan9 506 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → 𝑧𝐴)
92 suceq 6316 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑛 = 𝑖 → suc 𝑛 = suc 𝑖)
9392sneqd 4570 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 = 𝑖 → {suc 𝑛} = {suc 𝑖})
94 oveq1 7262 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 = 𝑖 → (𝑛𝐹𝑥) = (𝑖𝐹𝑥))
9593, 94xpeq12d 5611 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑛 = 𝑖 → ({suc 𝑛} × (𝑛𝐹𝑥)) = ({suc 𝑖} × (𝑖𝐹𝑥)))
96 oveq2 7263 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑥 = 𝑧 → (𝑖𝐹𝑥) = (𝑖𝐹𝑧))
9796xpeq2d 5610 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑥 = 𝑧 → ({suc 𝑖} × (𝑖𝐹𝑥)) = ({suc 𝑖} × (𝑖𝐹𝑧)))
98 snex 5349 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 {suc 𝑖} ∈ V
99 ovex 7288 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑖𝐹𝑧) ∈ V
10098, 99xpex 7581 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ({suc 𝑖} × (𝑖𝐹𝑧)) ∈ V
10195, 97, 37, 100ovmpo 7411 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑖 ∈ ω ∧ 𝑧𝐴) → (𝑖𝐺𝑧) = ({suc 𝑖} × (𝑖𝐹𝑧)))
10286, 91, 101syl2anc 583 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (𝑖𝐺𝑧) = ({suc 𝑖} × (𝑖𝐹𝑧)))
10385, 102eqtrd 2778 . . . . . . . . . . . . . . . . . . . . . . . 24 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (𝐺‘(𝑖)) = ({suc 𝑖} × (𝑖𝐹𝑧)))
104 suceq 6316 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑘 = 𝑖 → suc 𝑘 = suc 𝑖)
105104fveq2d 6760 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 = 𝑖 → (‘suc 𝑘) = (‘suc 𝑖))
106 2fveq3 6761 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 = 𝑖 → (𝐺‘(𝑘)) = (𝐺‘(𝑖)))
107105, 106eleq12d 2833 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑘 = 𝑖 → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) ↔ (‘suc 𝑖) ∈ (𝐺‘(𝑖))))
108107rspcv 3547 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 ∈ ω → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (‘suc 𝑖) ∈ (𝐺‘(𝑖))))
109108ad2antlr 723 . . . . . . . . . . . . . . . . . . . . . . . 24 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (‘suc 𝑖) ∈ (𝐺‘(𝑖))))
110 eleq2 2827 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐺‘(𝑖)) = ({suc 𝑖} × (𝑖𝐹𝑧)) → ((‘suc 𝑖) ∈ (𝐺‘(𝑖)) ↔ (‘suc 𝑖) ∈ ({suc 𝑖} × (𝑖𝐹𝑧))))
111 elxp 5603 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((‘suc 𝑖) ∈ ({suc 𝑖} × (𝑖𝐹𝑧)) ↔ ∃𝑠𝑡((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))))
112 velsn 4574 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑠 ∈ {suc 𝑖} ↔ 𝑠 = suc 𝑖)
113 opeq1 4801 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑠 = suc 𝑖 → ⟨𝑠, 𝑡⟩ = ⟨suc 𝑖, 𝑡⟩)
114112, 113sylbi 216 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑠 ∈ {suc 𝑖} → ⟨𝑠, 𝑡⟩ = ⟨suc 𝑖, 𝑡⟩)
115114eqeq2d 2749 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑠 ∈ {suc 𝑖} → ((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ↔ (‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩))
116115biimpac 478 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ 𝑠 ∈ {suc 𝑖}) → (‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
117116adantrr 713 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))) → (‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
118117eximi 1838 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (∃𝑡((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
119118exlimiv 1934 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (∃𝑠𝑡((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
120111, 119sylbi 216 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((‘suc 𝑖) ∈ ({suc 𝑖} × (𝑖𝐹𝑧)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
121110, 120syl6bi 252 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐺‘(𝑖)) = ({suc 𝑖} × (𝑖𝐹𝑧)) → ((‘suc 𝑖) ∈ (𝐺‘(𝑖)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩))
122103, 109, 121sylsyld 61 . . . . . . . . . . . . . . . . . . . . . . 23 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩))
123122expcom 413 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖) = ⟨𝑖, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)))
124123exlimiv 1934 . . . . . . . . . . . . . . . . . . . . 21 (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)))
125124com3l 89 . . . . . . . . . . . . . . . . . . . 20 ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)))
126 opeq2 4802 . . . . . . . . . . . . . . . . . . . . . 22 (𝑡 = 𝑧 → ⟨suc 𝑖, 𝑡⟩ = ⟨suc 𝑖, 𝑧⟩)
127126eqeq2d 2749 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 = 𝑧 → ((‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩ ↔ (‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩))
128127cbvexvw 2041 . . . . . . . . . . . . . . . . . . . 20 (∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩ ↔ ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)
129125, 128syl8ib 255 . . . . . . . . . . . . . . . . . . 19 ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
130129impancom 451 . . . . . . . . . . . . . . . . . 18 ((:ω⟶(ω × 𝐴) ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (𝑖 ∈ ω → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
1311303adant2 1129 . . . . . . . . . . . . . . . . 17 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (𝑖 ∈ ω → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
132131adantl 481 . . . . . . . . . . . . . . . 16 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑖 ∈ ω → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
133132com12 32 . . . . . . . . . . . . . . 15 (𝑖 ∈ ω → ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
13468, 72, 76, 81, 133finds2 7721 . . . . . . . . . . . . . 14 (𝑚 ∈ ω → ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩))
135134com12 32 . . . . . . . . . . . . 13 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑚 ∈ ω → ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩))
136135ralrimiv 3106 . . . . . . . . . . . 12 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∀𝑚 ∈ ω ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩)
137 fveq2 6756 . . . . . . . . . . . . . . 15 (𝑚 = 𝑘 → (𝑚) = (𝑘))
138 opeq1 4801 . . . . . . . . . . . . . . 15 (𝑚 = 𝑘 → ⟨𝑚, 𝑧⟩ = ⟨𝑘, 𝑧⟩)
139137, 138eqeq12d 2754 . . . . . . . . . . . . . 14 (𝑚 = 𝑘 → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (𝑘) = ⟨𝑘, 𝑧⟩))
140139exbidv 1925 . . . . . . . . . . . . 13 (𝑚 = 𝑘 → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩))
141140rspccv 3549 . . . . . . . . . . . 12 (∀𝑚 ∈ ω ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ → (𝑘 ∈ ω → ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩))
142136, 141syl 17 . . . . . . . . . . 11 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑘 ∈ ω → ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩))
1431423impia 1115 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩)
144 simp21 1204 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → :ω⟶(ω × 𝐴))
145 simp3 1136 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → 𝑘 ∈ ω)
146 rspa 3130 . . . . . . . . . . . 12 ((∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) ∧ 𝑘 ∈ ω) → (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
1471463ad2antl3 1185 . . . . . . . . . . 11 (((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
1481473adant1 1128 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
149 simpl 482 . . . . . . . . . . . . . . . . 17 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝑘) = ⟨𝑘, 𝑧⟩)
150149fveq2d 6760 . . . . . . . . . . . . . . . 16 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝐺‘(𝑘)) = (𝐺‘⟨𝑘, 𝑧⟩))
151 simprr 769 . . . . . . . . . . . . . . . . 17 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → 𝑘 ∈ ω)
152 eleq1 2826 . . . . . . . . . . . . . . . . . . 19 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((𝑘) ∈ (ω × 𝐴) ↔ ⟨𝑘, 𝑧⟩ ∈ (ω × 𝐴)))
153 opelxp2 5622 . . . . . . . . . . . . . . . . . . 19 (⟨𝑘, 𝑧⟩ ∈ (ω × 𝐴) → 𝑧𝐴)
154152, 153syl6bi 252 . . . . . . . . . . . . . . . . . 18 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((𝑘) ∈ (ω × 𝐴) → 𝑧𝐴))
155 ffvelrn 6941 . . . . . . . . . . . . . . . . . 18 ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → (𝑘) ∈ (ω × 𝐴))
156154, 155impel 505 . . . . . . . . . . . . . . . . 17 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → 𝑧𝐴)
157 df-ov 7258 . . . . . . . . . . . . . . . . . 18 (𝑘𝐺𝑧) = (𝐺‘⟨𝑘, 𝑧⟩)
158 suceq 6316 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑘 → suc 𝑛 = suc 𝑘)
159158sneqd 4570 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑘 → {suc 𝑛} = {suc 𝑘})
160 oveq1 7262 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑘 → (𝑛𝐹𝑥) = (𝑘𝐹𝑥))
161159, 160xpeq12d 5611 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑘 → ({suc 𝑛} × (𝑛𝐹𝑥)) = ({suc 𝑘} × (𝑘𝐹𝑥)))
162 oveq2 7263 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = 𝑧 → (𝑘𝐹𝑥) = (𝑘𝐹𝑧))
163162xpeq2d 5610 . . . . . . . . . . . . . . . . . . 19 (𝑥 = 𝑧 → ({suc 𝑘} × (𝑘𝐹𝑥)) = ({suc 𝑘} × (𝑘𝐹𝑧)))
164 snex 5349 . . . . . . . . . . . . . . . . . . . 20 {suc 𝑘} ∈ V
165 ovex 7288 . . . . . . . . . . . . . . . . . . . 20 (𝑘𝐹𝑧) ∈ V
166164, 165xpex 7581 . . . . . . . . . . . . . . . . . . 19 ({suc 𝑘} × (𝑘𝐹𝑧)) ∈ V
167161, 163, 37, 166ovmpo 7411 . . . . . . . . . . . . . . . . . 18 ((𝑘 ∈ ω ∧ 𝑧𝐴) → (𝑘𝐺𝑧) = ({suc 𝑘} × (𝑘𝐹𝑧)))
168157, 167eqtr3id 2793 . . . . . . . . . . . . . . . . 17 ((𝑘 ∈ ω ∧ 𝑧𝐴) → (𝐺‘⟨𝑘, 𝑧⟩) = ({suc 𝑘} × (𝑘𝐹𝑧)))
169151, 156, 168syl2anc 583 . . . . . . . . . . . . . . . 16 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝐺‘⟨𝑘, 𝑧⟩) = ({suc 𝑘} × (𝑘𝐹𝑧)))
170150, 169eqtrd 2778 . . . . . . . . . . . . . . 15 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝐺‘(𝑘)) = ({suc 𝑘} × (𝑘𝐹𝑧)))
171170eleq2d 2824 . . . . . . . . . . . . . 14 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) ↔ (‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧))))
172 elxp 5603 . . . . . . . . . . . . . . . . 17 ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) ↔ ∃𝑠𝑡((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧))))
173 peano2 7711 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 ∈ ω → suc 𝑘 ∈ ω)
174 fvco3 6849 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((:ω⟶(ω × 𝐴) ∧ suc 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) = (2nd ‘(‘suc 𝑘)))
175173, 174sylan2 592 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) = (2nd ‘(‘suc 𝑘)))
176175adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) = (2nd ‘(‘suc 𝑘)))
177 simpll 763 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (‘suc 𝑘) = ⟨𝑠, 𝑡⟩)
178177fveq2d 6760 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (2nd ‘(‘suc 𝑘)) = (2nd ‘⟨𝑠, 𝑡⟩))
179176, 178eqtrd 2778 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) = (2nd ‘⟨𝑠, 𝑡⟩))
180 vex 3426 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑠 ∈ V
181 vex 3426 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑡 ∈ V
182180, 181op2nd 7813 . . . . . . . . . . . . . . . . . . . . . . . 24 (2nd ‘⟨𝑠, 𝑡⟩) = 𝑡
183179, 182eqtrdi 2795 . . . . . . . . . . . . . . . . . . . . . . 23 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) = 𝑡)
184 fvco3 6849 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘𝑘) = (2nd ‘(𝑘)))
185184adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘𝑘) = (2nd ‘(𝑘)))
186 simplr 765 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝑘) = ⟨𝑘, 𝑧⟩)
187186fveq2d 6760 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (2nd ‘(𝑘)) = (2nd ‘⟨𝑘, 𝑧⟩))
188185, 187eqtrd 2778 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘𝑘) = (2nd ‘⟨𝑘, 𝑧⟩))
189 vex 3426 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑘 ∈ V
190 vex 3426 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑧 ∈ V
191189, 190op2nd 7813 . . . . . . . . . . . . . . . . . . . . . . . . 25 (2nd ‘⟨𝑘, 𝑧⟩) = 𝑧
192188, 191eqtrdi 2795 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘𝑘) = 𝑧)
193192oveq2d 7271 . . . . . . . . . . . . . . . . . . . . . . 23 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝑘𝐹((2nd)‘𝑘)) = (𝑘𝐹𝑧))
194183, 193eleq12d 2833 . . . . . . . . . . . . . . . . . . . . . 22 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)) ↔ 𝑡 ∈ (𝑘𝐹𝑧)))
195194biimprcd 249 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 ∈ (𝑘𝐹𝑧) → ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
196195exp4c 432 . . . . . . . . . . . . . . . . . . . 20 (𝑡 ∈ (𝑘𝐹𝑧) → ((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))))
197196adantl 481 . . . . . . . . . . . . . . . . . . 19 ((𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧)) → ((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))))
198197impcom 407 . . . . . . . . . . . . . . . . . 18 (((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧))) → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
199198exlimivv 1936 . . . . . . . . . . . . . . . . 17 (∃𝑠𝑡((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧))) → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
200172, 199sylbi 216 . . . . . . . . . . . . . . . 16 ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
201200com3l 89 . . . . . . . . . . . . . . 15 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
202201imp 406 . . . . . . . . . . . . . 14 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
203171, 202sylbid 239 . . . . . . . . . . . . 13 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
204203ex 412 . . . . . . . . . . . 12 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
205204exlimiv 1934 . . . . . . . . . . 11 (∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
2062053imp 1109 . . . . . . . . . 10 ((∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) ∧ (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))
207143, 144, 145, 148, 206syl121anc 1373 . . . . . . . . 9 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))
2082073expia 1119 . . . . . . . 8 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑘 ∈ ω → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
20964, 208ralrimi 3139 . . . . . . 7 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))
21046, 58, 2093jca 1126 . . . . . 6 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ((2nd):ω⟶𝐴 ∧ ((2nd)‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
211 feq1 6565 . . . . . . 7 (𝑔 = (2nd) → (𝑔:ω⟶𝐴 ↔ (2nd):ω⟶𝐴))
212 fveq1 6755 . . . . . . . 8 (𝑔 = (2nd) → (𝑔‘∅) = ((2nd)‘∅))
213212eqeq1d 2740 . . . . . . 7 (𝑔 = (2nd) → ((𝑔‘∅) = 𝐶 ↔ ((2nd)‘∅) = 𝐶))
214 fveq1 6755 . . . . . . . . 9 (𝑔 = (2nd) → (𝑔‘suc 𝑘) = ((2nd)‘suc 𝑘))
215 fveq1 6755 . . . . . . . . . 10 (𝑔 = (2nd) → (𝑔𝑘) = ((2nd)‘𝑘))
216215oveq2d 7271 . . . . . . . . 9 (𝑔 = (2nd) → (𝑘𝐹(𝑔𝑘)) = (𝑘𝐹((2nd)‘𝑘)))
217214, 216eleq12d 2833 . . . . . . . 8 (𝑔 = (2nd) → ((𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)) ↔ ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
218217ralbidv 3120 . . . . . . 7 (𝑔 = (2nd) → (∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)) ↔ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
219211, 213, 2183anbi123d 1434 . . . . . 6 (𝑔 = (2nd) → ((𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))) ↔ ((2nd):ω⟶𝐴 ∧ ((2nd)‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
22049, 210, 219spcedv 3527 . . . . 5 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))))
221220ex 412 . . . 4 (𝐶𝐴 → ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
222221exlimdv 1937 . . 3 (𝐶𝐴 → (∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
223222adantr 480 . 2 ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → (∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
22443, 223mpd 15 1 ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1085   = wceq 1539  wex 1783  wcel 2108  wne 2942  wral 3063  Vcvv 3422  cdif 3880  wss 3883  c0 4253  𝒫 cpw 4530  {csn 4558  cop 4564   × cxp 5578  ccom 5584  suc csuc 6253  wf 6414  cfv 6418  (class class class)co 7255  cmpo 7257  ωcom 7687  2nd c2nd 7803
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2110  ax-9 2118  ax-10 2139  ax-11 2156  ax-12 2173  ax-ext 2709  ax-sep 5218  ax-nul 5225  ax-pow 5283  ax-pr 5347  ax-un 7566  ax-dc 10133
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-3or 1086  df-3an 1087  df-tru 1542  df-fal 1552  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2817  df-nfc 2888  df-ne 2943  df-ral 3068  df-rex 3069  df-reu 3070  df-rab 3072  df-v 3424  df-sbc 3712  df-csb 3829  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3902  df-nul 4254  df-if 4457  df-pw 4532  df-sn 4559  df-pr 4561  df-tp 4563  df-op 4565  df-uni 4837  df-iun 4923  df-br 5071  df-opab 5133  df-mpt 5154  df-tr 5188  df-id 5480  df-eprel 5486  df-po 5494  df-so 5495  df-fr 5535  df-we 5537  df-xp 5586  df-rel 5587  df-cnv 5588  df-co 5589  df-dm 5590  df-rn 5591  df-res 5592  df-ima 5593  df-ord 6254  df-on 6255  df-lim 6256  df-suc 6257  df-iota 6376  df-fun 6420  df-fn 6421  df-f 6422  df-f1 6423  df-fo 6424  df-f1o 6425  df-fv 6426  df-ov 7258  df-oprab 7259  df-mpo 7260  df-om 7688  df-1st 7804  df-2nd 7805  df-1o 8267
This theorem is referenced by:  axdc4  10143
  Copyright terms: Public domain W3C validator