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

Theorem axdc4lem 9592
Description: Lemma for axdc4 9593. (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 7346 . . . 4 ∅ ∈ ω
2 opelxpi 5379 . . . 4 ((∅ ∈ ω ∧ 𝐶𝐴) → ⟨∅, 𝐶⟩ ∈ (ω × 𝐴))
31, 2mpan 681 . . 3 (𝐶𝐴 → ⟨∅, 𝐶⟩ ∈ (ω × 𝐴))
4 simp2 1171 . . . . . . . 8 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → 𝑛 ∈ ω)
5 fovrn 7064 . . . . . . . 8 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → (𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅}))
6 peano2 7347 . . . . . . . . . . 11 (𝑛 ∈ ω → suc 𝑛 ∈ ω)
76snssd 4558 . . . . . . . . . 10 (𝑛 ∈ ω → {suc 𝑛} ⊆ ω)
8 eldifi 3959 . . . . . . . . . 10 ((𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅}) → (𝑛𝐹𝑥) ∈ 𝒫 𝐴)
9 axdc4lem.1 . . . . . . . . . . . 12 𝐴 ∈ V
109elpw2 5050 . . . . . . . . . . 11 ((𝑛𝐹𝑥) ∈ 𝒫 𝐴 ↔ (𝑛𝐹𝑥) ⊆ 𝐴)
11 xpss12 5357 . . . . . . . . . . 11 (({suc 𝑛} ⊆ ω ∧ (𝑛𝐹𝑥) ⊆ 𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
1210, 11sylan2b 587 . . . . . . . . . 10 (({suc 𝑛} ⊆ ω ∧ (𝑛𝐹𝑥) ∈ 𝒫 𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
137, 8, 12syl2an 589 . . . . . . . . 9 ((𝑛 ∈ ω ∧ (𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅})) → ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
14 snex 5129 . . . . . . . . . . 11 {suc 𝑛} ∈ V
15 ovex 6937 . . . . . . . . . . 11 (𝑛𝐹𝑥) ∈ V
1614, 15xpex 7223 . . . . . . . . . 10 ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ V
1716elpw 4384 . . . . . . . . 9 (({suc 𝑛} × (𝑛𝐹𝑥)) ∈ 𝒫 (ω × 𝐴) ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) ⊆ (ω × 𝐴))
1813, 17sylibr 226 . . . . . . . 8 ((𝑛 ∈ ω ∧ (𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅})) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ 𝒫 (ω × 𝐴))
194, 5, 18syl2anc 579 . . . . . . 7 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ 𝒫 (ω × 𝐴))
20 eldifn 3960 . . . . . . . 8 ((𝑛𝐹𝑥) ∈ (𝒫 𝐴 ∖ {∅}) → ¬ (𝑛𝐹𝑥) ∈ {∅})
2115elsn 4412 . . . . . . . . . . 11 ((𝑛𝐹𝑥) ∈ {∅} ↔ (𝑛𝐹𝑥) = ∅)
2221necon3bbii 3046 . . . . . . . . . 10 (¬ (𝑛𝐹𝑥) ∈ {∅} ↔ (𝑛𝐹𝑥) ≠ ∅)
23 vex 3417 . . . . . . . . . . . . 13 𝑛 ∈ V
2423sucex 7272 . . . . . . . . . . . 12 suc 𝑛 ∈ V
2524snnz 4528 . . . . . . . . . . 11 {suc 𝑛} ≠ ∅
26 xpnz 5794 . . . . . . . . . . . 12 (({suc 𝑛} ≠ ∅ ∧ (𝑛𝐹𝑥) ≠ ∅) ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
2726biimpi 208 . . . . . . . . . . 11 (({suc 𝑛} ≠ ∅ ∧ (𝑛𝐹𝑥) ≠ ∅) → ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
2825, 27mpan 681 . . . . . . . . . 10 ((𝑛𝐹𝑥) ≠ ∅ → ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
2922, 28sylbi 209 . . . . . . . . 9 (¬ (𝑛𝐹𝑥) ∈ {∅} → ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
3016elsn 4412 . . . . . . . . . 10 (({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅} ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) = ∅)
3130necon3bbii 3046 . . . . . . . . 9 (¬ ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅} ↔ ({suc 𝑛} × (𝑛𝐹𝑥)) ≠ ∅)
3229, 31sylibr 226 . . . . . . . 8 (¬ (𝑛𝐹𝑥) ∈ {∅} → ¬ ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅})
335, 20, 323syl 18 . . . . . . 7 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → ¬ ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ {∅})
3419, 33eldifd 3809 . . . . . 6 ((𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) ∧ 𝑛 ∈ ω ∧ 𝑥𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅}))
35343expib 1156 . . . . 5 (𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) → ((𝑛 ∈ ω ∧ 𝑥𝐴) → ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅})))
3635ralrimivv 3179 . . . 4 (𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) → ∀𝑛 ∈ ω ∀𝑥𝐴 ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅}))
37 axdc4lem.2 . . . . 5 𝐺 = (𝑛 ∈ ω, 𝑥𝐴 ↦ ({suc 𝑛} × (𝑛𝐹𝑥)))
3837fmpt2 7500 . . . 4 (∀𝑛 ∈ ω ∀𝑥𝐴 ({suc 𝑛} × (𝑛𝐹𝑥)) ∈ (𝒫 (ω × 𝐴) ∖ {∅}) ↔ 𝐺:(ω × 𝐴)⟶(𝒫 (ω × 𝐴) ∖ {∅}))
3936, 38sylib 210 . . 3 (𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅}) → 𝐺:(ω × 𝐴)⟶(𝒫 (ω × 𝐴) ∖ {∅}))
40 dcomex 9584 . . . . 5 ω ∈ V
4140, 9xpex 7223 . . . 4 (ω × 𝐴) ∈ V
4241axdc3 9591 . . 3 ((⟨∅, 𝐶⟩ ∈ (ω × 𝐴) ∧ 𝐺:(ω × 𝐴)⟶(𝒫 (ω × 𝐴) ∖ {∅})) → ∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))))
433, 39, 42syl2an 589 . 2 ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → ∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))))
44 2ndcof 7459 . . . . . . . . 9 (:ω⟶(ω × 𝐴) → (2nd):ω⟶𝐴)
45443ad2ant1 1167 . . . . . . . 8 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (2nd):ω⟶𝐴)
4645adantl 475 . . . . . . 7 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (2nd):ω⟶𝐴)
47 fex2 7383 . . . . . . . 8 (((2nd):ω⟶𝐴 ∧ ω ∈ V ∧ 𝐴 ∈ V) → (2nd) ∈ V)
4840, 9, 47mp3an23 1581 . . . . . . 7 ((2nd):ω⟶𝐴 → (2nd) ∈ V)
4946, 48syl 17 . . . . . 6 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (2nd) ∈ V)
50 fvco3 6522 . . . . . . . . . . 11 ((:ω⟶(ω × 𝐴) ∧ ∅ ∈ ω) → ((2nd)‘∅) = (2nd ‘(‘∅)))
511, 50mpan2 682 . . . . . . . . . 10 (:ω⟶(ω × 𝐴) → ((2nd)‘∅) = (2nd ‘(‘∅)))
52513ad2ant1 1167 . . . . . . . . 9 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ((2nd)‘∅) = (2nd ‘(‘∅)))
53 fveq2 6433 . . . . . . . . . 10 ((‘∅) = ⟨∅, 𝐶⟩ → (2nd ‘(‘∅)) = (2nd ‘⟨∅, 𝐶⟩))
54533ad2ant2 1168 . . . . . . . . 9 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (2nd ‘(‘∅)) = (2nd ‘⟨∅, 𝐶⟩))
5552, 54eqtrd 2861 . . . . . . . 8 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ((2nd)‘∅) = (2nd ‘⟨∅, 𝐶⟩))
56 op2ndg 7441 . . . . . . . . 9 ((∅ ∈ ω ∧ 𝐶𝐴) → (2nd ‘⟨∅, 𝐶⟩) = 𝐶)
571, 56mpan 681 . . . . . . . 8 (𝐶𝐴 → (2nd ‘⟨∅, 𝐶⟩) = 𝐶)
5855, 57sylan9eqr 2883 . . . . . . 7 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ((2nd)‘∅) = 𝐶)
59 nfv 2013 . . . . . . . . 9 𝑘 𝐶𝐴
60 nfv 2013 . . . . . . . . . 10 𝑘 :ω⟶(ω × 𝐴)
61 nfv 2013 . . . . . . . . . 10 𝑘(‘∅) = ⟨∅, 𝐶
62 nfra1 3150 . . . . . . . . . 10 𝑘𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))
6360, 61, 62nf3an 2004 . . . . . . . . 9 𝑘(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
6459, 63nfan 2002 . . . . . . . 8 𝑘(𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))))
65 fveq2 6433 . . . . . . . . . . . . . . . . 17 (𝑚 = ∅ → (𝑚) = (‘∅))
66 opeq1 4623 . . . . . . . . . . . . . . . . 17 (𝑚 = ∅ → ⟨𝑚, 𝑧⟩ = ⟨∅, 𝑧⟩)
6765, 66eqeq12d 2840 . . . . . . . . . . . . . . . 16 (𝑚 = ∅ → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (‘∅) = ⟨∅, 𝑧⟩))
6867exbidv 2020 . . . . . . . . . . . . . . 15 (𝑚 = ∅ → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(‘∅) = ⟨∅, 𝑧⟩))
69 fveq2 6433 . . . . . . . . . . . . . . . . 17 (𝑚 = 𝑖 → (𝑚) = (𝑖))
70 opeq1 4623 . . . . . . . . . . . . . . . . 17 (𝑚 = 𝑖 → ⟨𝑚, 𝑧⟩ = ⟨𝑖, 𝑧⟩)
7169, 70eqeq12d 2840 . . . . . . . . . . . . . . . 16 (𝑚 = 𝑖 → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (𝑖) = ⟨𝑖, 𝑧⟩))
7271exbidv 2020 . . . . . . . . . . . . . . 15 (𝑚 = 𝑖 → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩))
73 fveq2 6433 . . . . . . . . . . . . . . . . 17 (𝑚 = suc 𝑖 → (𝑚) = (‘suc 𝑖))
74 opeq1 4623 . . . . . . . . . . . . . . . . 17 (𝑚 = suc 𝑖 → ⟨𝑚, 𝑧⟩ = ⟨suc 𝑖, 𝑧⟩)
7573, 74eqeq12d 2840 . . . . . . . . . . . . . . . 16 (𝑚 = suc 𝑖 → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩))
7675exbidv 2020 . . . . . . . . . . . . . . 15 (𝑚 = suc 𝑖 → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩))
77 opeq2 4624 . . . . . . . . . . . . . . . . . . 19 (𝑧 = 𝐶 → ⟨∅, 𝑧⟩ = ⟨∅, 𝐶⟩)
7877eqeq2d 2835 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝐶 → ((‘∅) = ⟨∅, 𝑧⟩ ↔ (‘∅) = ⟨∅, 𝐶⟩))
7978spcegv 3511 . . . . . . . . . . . . . . . . 17 (𝐶𝐴 → ((‘∅) = ⟨∅, 𝐶⟩ → ∃𝑧(‘∅) = ⟨∅, 𝑧⟩))
8079imp 397 . . . . . . . . . . . . . . . 16 ((𝐶𝐴 ∧ (‘∅) = ⟨∅, 𝐶⟩) → ∃𝑧(‘∅) = ⟨∅, 𝑧⟩)
81803ad2antr2 1244 . . . . . . . . . . . . . . 15 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∃𝑧(‘∅) = ⟨∅, 𝑧⟩)
82 fveq2 6433 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑖) = ⟨𝑖, 𝑧⟩ → (𝐺‘(𝑖)) = (𝐺‘⟨𝑖, 𝑧⟩))
83 df-ov 6908 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑖𝐺𝑧) = (𝐺‘⟨𝑖, 𝑧⟩)
8482, 83syl6eqr 2879 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑖) = ⟨𝑖, 𝑧⟩ → (𝐺‘(𝑖)) = (𝑖𝐺𝑧))
8584adantl 475 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (𝐺‘(𝑖)) = (𝑖𝐺𝑧))
86 simplr 785 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → 𝑖 ∈ ω)
87 ffvelrn 6606 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (𝑖) ∈ (ω × 𝐴))
88 eleq1 2894 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑖) = ⟨𝑖, 𝑧⟩ → ((𝑖) ∈ (ω × 𝐴) ↔ ⟨𝑖, 𝑧⟩ ∈ (ω × 𝐴)))
89 opelxp2 5384 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (⟨𝑖, 𝑧⟩ ∈ (ω × 𝐴) → 𝑧𝐴)
9088, 89syl6bi 245 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑖) = ⟨𝑖, 𝑧⟩ → ((𝑖) ∈ (ω × 𝐴) → 𝑧𝐴))
9187, 90mpan9 502 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → 𝑧𝐴)
92 suceq 6028 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑛 = 𝑖 → suc 𝑛 = suc 𝑖)
9392sneqd 4409 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 = 𝑖 → {suc 𝑛} = {suc 𝑖})
94 oveq1 6912 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑛 = 𝑖 → (𝑛𝐹𝑥) = (𝑖𝐹𝑥))
9593, 94xpeq12d 5373 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑛 = 𝑖 → ({suc 𝑛} × (𝑛𝐹𝑥)) = ({suc 𝑖} × (𝑖𝐹𝑥)))
96 oveq2 6913 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑥 = 𝑧 → (𝑖𝐹𝑥) = (𝑖𝐹𝑧))
9796xpeq2d 5372 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑥 = 𝑧 → ({suc 𝑖} × (𝑖𝐹𝑥)) = ({suc 𝑖} × (𝑖𝐹𝑧)))
98 snex 5129 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 {suc 𝑖} ∈ V
99 ovex 6937 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑖𝐹𝑧) ∈ V
10098, 99xpex 7223 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ({suc 𝑖} × (𝑖𝐹𝑧)) ∈ V
10195, 97, 37, 100ovmpt2 7056 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑖 ∈ ω ∧ 𝑧𝐴) → (𝑖𝐺𝑧) = ({suc 𝑖} × (𝑖𝐹𝑧)))
10286, 91, 101syl2anc 579 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (𝑖𝐺𝑧) = ({suc 𝑖} × (𝑖𝐹𝑧)))
10385, 102eqtrd 2861 . . . . . . . . . . . . . . . . . . . . . . . 24 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (𝐺‘(𝑖)) = ({suc 𝑖} × (𝑖𝐹𝑧)))
104 suceq 6028 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑘 = 𝑖 → suc 𝑘 = suc 𝑖)
105104fveq2d 6437 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 = 𝑖 → (‘suc 𝑘) = (‘suc 𝑖))
106 2fveq3 6438 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 = 𝑖 → (𝐺‘(𝑘)) = (𝐺‘(𝑖)))
107105, 106eleq12d 2900 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑘 = 𝑖 → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) ↔ (‘suc 𝑖) ∈ (𝐺‘(𝑖))))
108107rspcv 3522 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑖 ∈ ω → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (‘suc 𝑖) ∈ (𝐺‘(𝑖))))
109108ad2antlr 718 . . . . . . . . . . . . . . . . . . . . . . . 24 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (‘suc 𝑖) ∈ (𝐺‘(𝑖))))
110 eleq2 2895 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐺‘(𝑖)) = ({suc 𝑖} × (𝑖𝐹𝑧)) → ((‘suc 𝑖) ∈ (𝐺‘(𝑖)) ↔ (‘suc 𝑖) ∈ ({suc 𝑖} × (𝑖𝐹𝑧))))
111 elxp 5365 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((‘suc 𝑖) ∈ ({suc 𝑖} × (𝑖𝐹𝑧)) ↔ ∃𝑠𝑡((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))))
112 velsn 4413 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑠 ∈ {suc 𝑖} ↔ 𝑠 = suc 𝑖)
113 opeq1 4623 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑠 = suc 𝑖 → ⟨𝑠, 𝑡⟩ = ⟨suc 𝑖, 𝑡⟩)
114112, 113sylbi 209 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑠 ∈ {suc 𝑖} → ⟨𝑠, 𝑡⟩ = ⟨suc 𝑖, 𝑡⟩)
115114eqeq2d 2835 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑠 ∈ {suc 𝑖} → ((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ↔ (‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩))
116115biimpac 472 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ 𝑠 ∈ {suc 𝑖}) → (‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
117116adantrr 708 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))) → (‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
118117eximi 1933 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (∃𝑡((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
119118exlimiv 2029 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (∃𝑠𝑡((‘suc 𝑖) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑖} ∧ 𝑡 ∈ (𝑖𝐹𝑧))) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
120111, 119sylbi 209 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((‘suc 𝑖) ∈ ({suc 𝑖} × (𝑖𝐹𝑧)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)
121110, 120syl6bi 245 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐺‘(𝑖)) = ({suc 𝑖} × (𝑖𝐹𝑧)) → ((‘suc 𝑖) ∈ (𝐺‘(𝑖)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩))
122103, 109, 121sylsyld 61 . . . . . . . . . . . . . . . . . . . . . . 23 (((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) ∧ (𝑖) = ⟨𝑖, 𝑧⟩) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩))
123122expcom 404 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑖) = ⟨𝑖, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)))
124123exlimiv 2029 . . . . . . . . . . . . . . . . . . . . 21 (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)))
125124com3l 89 . . . . . . . . . . . . . . . . . . . 20 ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩)))
126 opeq2 4624 . . . . . . . . . . . . . . . . . . . . . 22 (𝑡 = 𝑧 → ⟨suc 𝑖, 𝑡⟩ = ⟨suc 𝑖, 𝑧⟩)
127126eqeq2d 2835 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 = 𝑧 → ((‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩ ↔ (‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩))
128127cbvexvw 2144 . . . . . . . . . . . . . . . . . . . 20 (∃𝑡(‘suc 𝑖) = ⟨suc 𝑖, 𝑡⟩ ↔ ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)
129125, 128syl8ib 248 . . . . . . . . . . . . . . . . . . 19 ((:ω⟶(ω × 𝐴) ∧ 𝑖 ∈ ω) → (∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
130129impancom 445 . . . . . . . . . . . . . . . . . 18 ((:ω⟶(ω × 𝐴) ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (𝑖 ∈ ω → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
1311303adant2 1165 . . . . . . . . . . . . . . . . 17 ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → (𝑖 ∈ ω → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
132131adantl 475 . . . . . . . . . . . . . . . 16 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑖 ∈ ω → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
133132com12 32 . . . . . . . . . . . . . . 15 (𝑖 ∈ ω → ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (∃𝑧(𝑖) = ⟨𝑖, 𝑧⟩ → ∃𝑧(‘suc 𝑖) = ⟨suc 𝑖, 𝑧⟩)))
13468, 72, 76, 81, 133finds2 7355 . . . . . . . . . . . . . 14 (𝑚 ∈ ω → ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩))
135134com12 32 . . . . . . . . . . . . 13 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑚 ∈ ω → ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩))
136135ralrimiv 3174 . . . . . . . . . . . 12 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∀𝑚 ∈ ω ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩)
137 fveq2 6433 . . . . . . . . . . . . . . 15 (𝑚 = 𝑘 → (𝑚) = (𝑘))
138 opeq1 4623 . . . . . . . . . . . . . . 15 (𝑚 = 𝑘 → ⟨𝑚, 𝑧⟩ = ⟨𝑘, 𝑧⟩)
139137, 138eqeq12d 2840 . . . . . . . . . . . . . 14 (𝑚 = 𝑘 → ((𝑚) = ⟨𝑚, 𝑧⟩ ↔ (𝑘) = ⟨𝑘, 𝑧⟩))
140139exbidv 2020 . . . . . . . . . . . . 13 (𝑚 = 𝑘 → (∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ ↔ ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩))
141140rspccv 3523 . . . . . . . . . . . 12 (∀𝑚 ∈ ω ∃𝑧(𝑚) = ⟨𝑚, 𝑧⟩ → (𝑘 ∈ ω → ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩))
142136, 141syl 17 . . . . . . . . . . 11 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑘 ∈ ω → ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩))
1431423impia 1149 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → ∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩)
144 simp21 1267 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → :ω⟶(ω × 𝐴))
145 simp3 1172 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → 𝑘 ∈ ω)
146 rspa 3139 . . . . . . . . . . . 12 ((∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)) ∧ 𝑘 ∈ ω) → (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
1471463ad2antl3 1242 . . . . . . . . . . 11 (((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
1481473adant1 1164 . . . . . . . . . 10 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → (‘suc 𝑘) ∈ (𝐺‘(𝑘)))
149 simpl 476 . . . . . . . . . . . . . . . . 17 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝑘) = ⟨𝑘, 𝑧⟩)
150149fveq2d 6437 . . . . . . . . . . . . . . . 16 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝐺‘(𝑘)) = (𝐺‘⟨𝑘, 𝑧⟩))
151 simprr 789 . . . . . . . . . . . . . . . . 17 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → 𝑘 ∈ ω)
152 ffvelrn 6606 . . . . . . . . . . . . . . . . . . 19 ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → (𝑘) ∈ (ω × 𝐴))
153 eleq1 2894 . . . . . . . . . . . . . . . . . . . 20 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((𝑘) ∈ (ω × 𝐴) ↔ ⟨𝑘, 𝑧⟩ ∈ (ω × 𝐴)))
154 opelxp2 5384 . . . . . . . . . . . . . . . . . . . 20 (⟨𝑘, 𝑧⟩ ∈ (ω × 𝐴) → 𝑧𝐴)
155153, 154syl6bi 245 . . . . . . . . . . . . . . . . . . 19 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((𝑘) ∈ (ω × 𝐴) → 𝑧𝐴))
156152, 155syl5 34 . . . . . . . . . . . . . . . . . 18 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → 𝑧𝐴))
157156imp 397 . . . . . . . . . . . . . . . . 17 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → 𝑧𝐴)
158 df-ov 6908 . . . . . . . . . . . . . . . . . 18 (𝑘𝐺𝑧) = (𝐺‘⟨𝑘, 𝑧⟩)
159 suceq 6028 . . . . . . . . . . . . . . . . . . . . 21 (𝑛 = 𝑘 → suc 𝑛 = suc 𝑘)
160159sneqd 4409 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑘 → {suc 𝑛} = {suc 𝑘})
161 oveq1 6912 . . . . . . . . . . . . . . . . . . . 20 (𝑛 = 𝑘 → (𝑛𝐹𝑥) = (𝑘𝐹𝑥))
162160, 161xpeq12d 5373 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑘 → ({suc 𝑛} × (𝑛𝐹𝑥)) = ({suc 𝑘} × (𝑘𝐹𝑥)))
163 oveq2 6913 . . . . . . . . . . . . . . . . . . . 20 (𝑥 = 𝑧 → (𝑘𝐹𝑥) = (𝑘𝐹𝑧))
164163xpeq2d 5372 . . . . . . . . . . . . . . . . . . 19 (𝑥 = 𝑧 → ({suc 𝑘} × (𝑘𝐹𝑥)) = ({suc 𝑘} × (𝑘𝐹𝑧)))
165 snex 5129 . . . . . . . . . . . . . . . . . . . 20 {suc 𝑘} ∈ V
166 ovex 6937 . . . . . . . . . . . . . . . . . . . 20 (𝑘𝐹𝑧) ∈ V
167165, 166xpex 7223 . . . . . . . . . . . . . . . . . . 19 ({suc 𝑘} × (𝑘𝐹𝑧)) ∈ V
168162, 164, 37, 167ovmpt2 7056 . . . . . . . . . . . . . . . . . 18 ((𝑘 ∈ ω ∧ 𝑧𝐴) → (𝑘𝐺𝑧) = ({suc 𝑘} × (𝑘𝐹𝑧)))
169158, 168syl5eqr 2875 . . . . . . . . . . . . . . . . 17 ((𝑘 ∈ ω ∧ 𝑧𝐴) → (𝐺‘⟨𝑘, 𝑧⟩) = ({suc 𝑘} × (𝑘𝐹𝑧)))
170151, 157, 169syl2anc 579 . . . . . . . . . . . . . . . 16 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝐺‘⟨𝑘, 𝑧⟩) = ({suc 𝑘} × (𝑘𝐹𝑧)))
171150, 170eqtrd 2861 . . . . . . . . . . . . . . 15 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝐺‘(𝑘)) = ({suc 𝑘} × (𝑘𝐹𝑧)))
172171eleq2d 2892 . . . . . . . . . . . . . 14 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) ↔ (‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧))))
173 elxp 5365 . . . . . . . . . . . . . . . . 17 ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) ↔ ∃𝑠𝑡((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧))))
174 peano2 7347 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑘 ∈ ω → suc 𝑘 ∈ ω)
175 fvco3 6522 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((:ω⟶(ω × 𝐴) ∧ suc 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) = (2nd ‘(‘suc 𝑘)))
176174, 175sylan2 586 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) = (2nd ‘(‘suc 𝑘)))
177176adantl 475 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) = (2nd ‘(‘suc 𝑘)))
178 simpll 783 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (‘suc 𝑘) = ⟨𝑠, 𝑡⟩)
179178fveq2d 6437 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (2nd ‘(‘suc 𝑘)) = (2nd ‘⟨𝑠, 𝑡⟩))
180177, 179eqtrd 2861 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) = (2nd ‘⟨𝑠, 𝑡⟩))
181 vex 3417 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑠 ∈ V
182 vex 3417 . . . . . . . . . . . . . . . . . . . . . . . . 25 𝑡 ∈ V
183181, 182op2nd 7437 . . . . . . . . . . . . . . . . . . . . . . . 24 (2nd ‘⟨𝑠, 𝑡⟩) = 𝑡
184180, 183syl6eq 2877 . . . . . . . . . . . . . . . . . . . . . . 23 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) = 𝑡)
185 fvco3 6522 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘𝑘) = (2nd ‘(𝑘)))
186185adantl 475 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘𝑘) = (2nd ‘(𝑘)))
187 simplr 785 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝑘) = ⟨𝑘, 𝑧⟩)
188187fveq2d 6437 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (2nd ‘(𝑘)) = (2nd ‘⟨𝑘, 𝑧⟩))
189186, 188eqtrd 2861 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘𝑘) = (2nd ‘⟨𝑘, 𝑧⟩))
190 vex 3417 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑘 ∈ V
191 vex 3417 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑧 ∈ V
192190, 191op2nd 7437 . . . . . . . . . . . . . . . . . . . . . . . . 25 (2nd ‘⟨𝑘, 𝑧⟩) = 𝑧
193189, 192syl6eq 2877 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘𝑘) = 𝑧)
194193oveq2d 6921 . . . . . . . . . . . . . . . . . . . . . . 23 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (𝑘𝐹((2nd)‘𝑘)) = (𝑘𝐹𝑧))
195184, 194eleq12d 2900 . . . . . . . . . . . . . . . . . . . . . 22 ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → (((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)) ↔ 𝑡 ∈ (𝑘𝐹𝑧)))
196195biimprcd 242 . . . . . . . . . . . . . . . . . . . . 21 (𝑡 ∈ (𝑘𝐹𝑧) → ((((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑘) = ⟨𝑘, 𝑧⟩) ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
197196exp4c 425 . . . . . . . . . . . . . . . . . . . 20 (𝑡 ∈ (𝑘𝐹𝑧) → ((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))))
198197adantl 475 . . . . . . . . . . . . . . . . . . 19 ((𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧)) → ((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))))
199198impcom 398 . . . . . . . . . . . . . . . . . 18 (((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧))) → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
200199exlimivv 2031 . . . . . . . . . . . . . . . . 17 (∃𝑠𝑡((‘suc 𝑘) = ⟨𝑠, 𝑡⟩ ∧ (𝑠 ∈ {suc 𝑘} ∧ 𝑡 ∈ (𝑘𝐹𝑧))) → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
201173, 200sylbi 209 . . . . . . . . . . . . . . . 16 ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) → ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
202201com3l 89 . . . . . . . . . . . . . . 15 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
203202imp 397 . . . . . . . . . . . . . 14 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((‘suc 𝑘) ∈ ({suc 𝑘} × (𝑘𝐹𝑧)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
204172, 203sylbid 232 . . . . . . . . . . . . 13 (((𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω)) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
205204ex 403 . . . . . . . . . . . 12 ((𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
206205exlimiv 2029 . . . . . . . . . . 11 (∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩ → ((:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) → ((‘suc 𝑘) ∈ (𝐺‘(𝑘)) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
2072063imp 1141 . . . . . . . . . 10 ((∃𝑧(𝑘) = ⟨𝑘, 𝑧⟩ ∧ (:ω⟶(ω × 𝐴) ∧ 𝑘 ∈ ω) ∧ (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))
208143, 144, 145, 148, 207syl121anc 1498 . . . . . . . . 9 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) ∧ 𝑘 ∈ ω) → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))
2092083expia 1154 . . . . . . . 8 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → (𝑘 ∈ ω → ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
21064, 209ralrimi 3166 . . . . . . 7 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))
21146, 58, 2103jca 1162 . . . . . 6 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ((2nd):ω⟶𝐴 ∧ ((2nd)‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
212 feq1 6259 . . . . . . . 8 (𝑔 = (2nd) → (𝑔:ω⟶𝐴 ↔ (2nd):ω⟶𝐴))
213 fveq1 6432 . . . . . . . . 9 (𝑔 = (2nd) → (𝑔‘∅) = ((2nd)‘∅))
214213eqeq1d 2827 . . . . . . . 8 (𝑔 = (2nd) → ((𝑔‘∅) = 𝐶 ↔ ((2nd)‘∅) = 𝐶))
215 fveq1 6432 . . . . . . . . . 10 (𝑔 = (2nd) → (𝑔‘suc 𝑘) = ((2nd)‘suc 𝑘))
216 fveq1 6432 . . . . . . . . . . 11 (𝑔 = (2nd) → (𝑔𝑘) = ((2nd)‘𝑘))
217216oveq2d 6921 . . . . . . . . . 10 (𝑔 = (2nd) → (𝑘𝐹(𝑔𝑘)) = (𝑘𝐹((2nd)‘𝑘)))
218215, 217eleq12d 2900 . . . . . . . . 9 (𝑔 = (2nd) → ((𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)) ↔ ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
219218ralbidv 3195 . . . . . . . 8 (𝑔 = (2nd) → (∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)) ↔ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))))
220212, 214, 2193anbi123d 1564 . . . . . . 7 (𝑔 = (2nd) → ((𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))) ↔ ((2nd):ω⟶𝐴 ∧ ((2nd)‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘)))))
221220spcegv 3511 . . . . . 6 ((2nd) ∈ V → (((2nd):ω⟶𝐴 ∧ ((2nd)‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω ((2nd)‘suc 𝑘) ∈ (𝑘𝐹((2nd)‘𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
22249, 211, 221sylc 65 . . . . 5 ((𝐶𝐴 ∧ (:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘)))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))))
223222ex 403 . . . 4 (𝐶𝐴 → ((:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
224223exlimdv 2032 . . 3 (𝐶𝐴 → (∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
225224adantr 474 . 2 ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → (∃(:ω⟶(ω × 𝐴) ∧ (‘∅) = ⟨∅, 𝐶⟩ ∧ ∀𝑘 ∈ ω (‘suc 𝑘) ∈ (𝐺‘(𝑘))) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘)))))
22643, 225mpd 15 1 ((𝐶𝐴𝐹:(ω × 𝐴)⟶(𝒫 𝐴 ∖ {∅})) → ∃𝑔(𝑔:ω⟶𝐴 ∧ (𝑔‘∅) = 𝐶 ∧ ∀𝑘 ∈ ω (𝑔‘suc 𝑘) ∈ (𝑘𝐹(𝑔𝑘))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 386  w3a 1111   = wceq 1656  wex 1878  wcel 2164  wne 2999  wral 3117  Vcvv 3414  cdif 3795  wss 3798  c0 4144  𝒫 cpw 4378  {csn 4397  cop 4403   × cxp 5340  ccom 5346  suc csuc 5965  wf 6119  cfv 6123  (class class class)co 6905  cmpt2 6907  ωcom 7326  2nd c2nd 7427
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1894  ax-4 1908  ax-5 2009  ax-6 2075  ax-7 2112  ax-8 2166  ax-9 2173  ax-10 2192  ax-11 2207  ax-12 2220  ax-13 2389  ax-ext 2803  ax-sep 5005  ax-nul 5013  ax-pow 5065  ax-pr 5127  ax-un 7209  ax-dc 9583
This theorem depends on definitions:  df-bi 199  df-an 387  df-or 879  df-3or 1112  df-3an 1113  df-tru 1660  df-ex 1879  df-nf 1883  df-sb 2068  df-mo 2605  df-eu 2640  df-clab 2812  df-cleq 2818  df-clel 2821  df-nfc 2958  df-ne 3000  df-ral 3122  df-rex 3123  df-reu 3124  df-rab 3126  df-v 3416  df-sbc 3663  df-csb 3758  df-dif 3801  df-un 3803  df-in 3805  df-ss 3812  df-pss 3814  df-nul 4145  df-if 4307  df-pw 4380  df-sn 4398  df-pr 4400  df-tp 4402  df-op 4404  df-uni 4659  df-iun 4742  df-br 4874  df-opab 4936  df-mpt 4953  df-tr 4976  df-id 5250  df-eprel 5255  df-po 5263  df-so 5264  df-fr 5301  df-we 5303  df-xp 5348  df-rel 5349  df-cnv 5350  df-co 5351  df-dm 5352  df-rn 5353  df-res 5354  df-ima 5355  df-ord 5966  df-on 5967  df-lim 5968  df-suc 5969  df-iota 6086  df-fun 6125  df-fn 6126  df-f 6127  df-f1 6128  df-fo 6129  df-f1o 6130  df-fv 6131  df-ov 6908  df-oprab 6909  df-mpt2 6910  df-om 7327  df-1st 7428  df-2nd 7429  df-1o 7826
This theorem is referenced by:  axdc4  9593
  Copyright terms: Public domain W3C validator