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

Theorem fseqenlem1 10009
Description: Lemma for fseqen 10012. (Contributed by Mario Carneiro, 17-May-2015.)
Hypotheses
Ref Expression
fseqenlem.a (𝜑𝐴𝑉)
fseqenlem.b (𝜑𝐵𝐴)
fseqenlem.f (𝜑𝐹:(𝐴 × 𝐴)–1-1-onto𝐴)
fseqenlem.g 𝐺 = seqω((𝑛 ∈ V, 𝑓 ∈ V ↦ (𝑥 ∈ (𝐴m suc 𝑛) ↦ ((𝑓‘(𝑥𝑛))𝐹(𝑥𝑛)))), {⟨∅, 𝐵⟩})
Assertion
Ref Expression
fseqenlem1 ((𝜑𝐶 ∈ ω) → (𝐺𝐶):(𝐴m 𝐶)–1-1𝐴)
Distinct variable groups:   𝑓,𝑛,𝑥,𝐹   𝐴,𝑓,𝑛,𝑥   𝜑,𝑛,𝑥
Allowed substitution hints:   𝜑(𝑓)   𝐵(𝑥,𝑓,𝑛)   𝐶(𝑥,𝑓,𝑛)   𝐺(𝑥,𝑓,𝑛)   𝑉(𝑥,𝑓,𝑛)

Proof of Theorem fseqenlem1
Dummy variables 𝑦 𝑎 𝑏 𝑧 𝑚 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 fveq2 6883 . . . . . 6 (𝑦 = 𝐶 → (𝐺𝑦) = (𝐺𝐶))
2 f1eq1 6771 . . . . . 6 ((𝐺𝑦) = (𝐺𝐶) → ((𝐺𝑦):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺𝐶):(𝐴m 𝑦)–1-1𝐴))
31, 2syl 18 . . . . 5 (𝑦 = 𝐶 → ((𝐺𝑦):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺𝐶):(𝐴m 𝑦)–1-1𝐴))
4 oveq2 7420 . . . . . 6 (𝑦 = 𝐶 → (𝐴m 𝑦) = (𝐴m 𝐶))
5 f1eq2 6772 . . . . . 6 ((𝐴m 𝑦) = (𝐴m 𝐶) → ((𝐺𝐶):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺𝐶):(𝐴m 𝐶)–1-1𝐴))
64, 5syl 18 . . . . 5 (𝑦 = 𝐶 → ((𝐺𝐶):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺𝐶):(𝐴m 𝐶)–1-1𝐴))
73, 6bitrd 282 . . . 4 (𝑦 = 𝐶 → ((𝐺𝑦):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺𝐶):(𝐴m 𝐶)–1-1𝐴))
87imbi2d 343 . . 3 (𝑦 = 𝐶 → ((𝜑 → (𝐺𝑦):(𝐴m 𝑦)–1-1𝐴) ↔ (𝜑 → (𝐺𝐶):(𝐴m 𝐶)–1-1𝐴)))
9 fveq2 6883 . . . . . . 7 (𝑦 = ∅ → (𝐺𝑦) = (𝐺‘∅))
10 snex 5412 . . . . . . . 8 {⟨∅, 𝐵⟩} ∈ V
11 fseqenlem.g . . . . . . . . 9 𝐺 = seqω((𝑛 ∈ V, 𝑓 ∈ V ↦ (𝑥 ∈ (𝐴m suc 𝑛) ↦ ((𝑓‘(𝑥𝑛))𝐹(𝑥𝑛)))), {⟨∅, 𝐵⟩})
1211seqom0g 8444 . . . . . . . 8 ({⟨∅, 𝐵⟩} ∈ V → (𝐺‘∅) = {⟨∅, 𝐵⟩})
1310, 12ax-mp 5 . . . . . . 7 (𝐺‘∅) = {⟨∅, 𝐵⟩}
149, 13eqtrdi 2814 . . . . . 6 (𝑦 = ∅ → (𝐺𝑦) = {⟨∅, 𝐵⟩})
15 f1eq1 6771 . . . . . 6 ((𝐺𝑦) = {⟨∅, 𝐵⟩} → ((𝐺𝑦):(𝐴m 𝑦)–1-1𝐴 ↔ {⟨∅, 𝐵⟩}:(𝐴m 𝑦)–1-1𝐴))
1614, 15syl 18 . . . . 5 (𝑦 = ∅ → ((𝐺𝑦):(𝐴m 𝑦)–1-1𝐴 ↔ {⟨∅, 𝐵⟩}:(𝐴m 𝑦)–1-1𝐴))
17 oveq2 7420 . . . . . 6 (𝑦 = ∅ → (𝐴m 𝑦) = (𝐴m ∅))
18 f1eq2 6772 . . . . . 6 ((𝐴m 𝑦) = (𝐴m ∅) → ({⟨∅, 𝐵⟩}:(𝐴m 𝑦)–1-1𝐴 ↔ {⟨∅, 𝐵⟩}:(𝐴m ∅)–1-1𝐴))
1917, 18syl 18 . . . . 5 (𝑦 = ∅ → ({⟨∅, 𝐵⟩}:(𝐴m 𝑦)–1-1𝐴 ↔ {⟨∅, 𝐵⟩}:(𝐴m ∅)–1-1𝐴))
2016, 19bitrd 282 . . . 4 (𝑦 = ∅ → ((𝐺𝑦):(𝐴m 𝑦)–1-1𝐴 ↔ {⟨∅, 𝐵⟩}:(𝐴m ∅)–1-1𝐴))
21 fveq2 6883 . . . . . 6 (𝑦 = 𝑚 → (𝐺𝑦) = (𝐺𝑚))
22 f1eq1 6771 . . . . . 6 ((𝐺𝑦) = (𝐺𝑚) → ((𝐺𝑦):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺𝑚):(𝐴m 𝑦)–1-1𝐴))
2321, 22syl 18 . . . . 5 (𝑦 = 𝑚 → ((𝐺𝑦):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺𝑚):(𝐴m 𝑦)–1-1𝐴))
24 oveq2 7420 . . . . . 6 (𝑦 = 𝑚 → (𝐴m 𝑦) = (𝐴m 𝑚))
25 f1eq2 6772 . . . . . 6 ((𝐴m 𝑦) = (𝐴m 𝑚) → ((𝐺𝑚):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴))
2624, 25syl 18 . . . . 5 (𝑦 = 𝑚 → ((𝐺𝑚):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴))
2723, 26bitrd 282 . . . 4 (𝑦 = 𝑚 → ((𝐺𝑦):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴))
28 fveq2 6883 . . . . . 6 (𝑦 = suc 𝑚 → (𝐺𝑦) = (𝐺‘suc 𝑚))
29 f1eq1 6771 . . . . . 6 ((𝐺𝑦) = (𝐺‘suc 𝑚) → ((𝐺𝑦):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺‘suc 𝑚):(𝐴m 𝑦)–1-1𝐴))
3028, 29syl 18 . . . . 5 (𝑦 = suc 𝑚 → ((𝐺𝑦):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺‘suc 𝑚):(𝐴m 𝑦)–1-1𝐴))
31 oveq2 7420 . . . . . 6 (𝑦 = suc 𝑚 → (𝐴m 𝑦) = (𝐴m suc 𝑚))
32 f1eq2 6772 . . . . . 6 ((𝐴m 𝑦) = (𝐴m suc 𝑚) → ((𝐺‘suc 𝑚):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺‘suc 𝑚):(𝐴m suc 𝑚)–1-1𝐴))
3331, 32syl 18 . . . . 5 (𝑦 = suc 𝑚 → ((𝐺‘suc 𝑚):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺‘suc 𝑚):(𝐴m suc 𝑚)–1-1𝐴))
3430, 33bitrd 282 . . . 4 (𝑦 = suc 𝑚 → ((𝐺𝑦):(𝐴m 𝑦)–1-1𝐴 ↔ (𝐺‘suc 𝑚):(𝐴m suc 𝑚)–1-1𝐴))
35 0ex 5271 . . . . . . . 8 ∅ ∈ V
36 fseqenlem.b . . . . . . . 8 (𝜑𝐵𝐴)
37 f1osng 6865 . . . . . . . 8 ((∅ ∈ V ∧ 𝐵𝐴) → {⟨∅, 𝐵⟩}:{∅}–1-1-onto→{𝐵})
3835, 36, 37sylancr 598 . . . . . . 7 (𝜑 → {⟨∅, 𝐵⟩}:{∅}–1-1-onto→{𝐵})
39 f1of1 6821 . . . . . . 7 ({⟨∅, 𝐵⟩}:{∅}–1-1-onto→{𝐵} → {⟨∅, 𝐵⟩}:{∅}–1-1→{𝐵})
4038, 39syl 18 . . . . . 6 (𝜑 → {⟨∅, 𝐵⟩}:{∅}–1-1→{𝐵})
4136snssd 4753 . . . . . 6 (𝜑 → {𝐵} ⊆ 𝐴)
42 f1ss 6783 . . . . . 6 (({⟨∅, 𝐵⟩}:{∅}–1-1→{𝐵} ∧ {𝐵} ⊆ 𝐴) → {⟨∅, 𝐵⟩}:{∅}–1-1𝐴)
4340, 41, 42syl2anc 595 . . . . 5 (𝜑 → {⟨∅, 𝐵⟩}:{∅}–1-1𝐴)
44 fseqenlem.a . . . . . . . 8 (𝜑𝐴𝑉)
45 map0e 8881 . . . . . . . 8 (𝐴𝑉 → (𝐴m ∅) = 1o)
4644, 45syl 18 . . . . . . 7 (𝜑 → (𝐴m ∅) = 1o)
47 df1o2 8461 . . . . . . 7 1o = {∅}
4846, 47eqtrdi 2814 . . . . . 6 (𝜑 → (𝐴m ∅) = {∅})
49 f1eq2 6772 . . . . . 6 ((𝐴m ∅) = {∅} → ({⟨∅, 𝐵⟩}:(𝐴m ∅)–1-1𝐴 ↔ {⟨∅, 𝐵⟩}:{∅}–1-1𝐴))
5048, 49syl 18 . . . . 5 (𝜑 → ({⟨∅, 𝐵⟩}:(𝐴m ∅)–1-1𝐴 ↔ {⟨∅, 𝐵⟩}:{∅}–1-1𝐴))
5143, 50mpbird 260 . . . 4 (𝜑 → {⟨∅, 𝐵⟩}:(𝐴m ∅)–1-1𝐴)
5211seqomsuc 8445 . . . . . . . . . 10 (𝑚 ∈ ω → (𝐺‘suc 𝑚) = (𝑚(𝑛 ∈ V, 𝑓 ∈ V ↦ (𝑥 ∈ (𝐴m suc 𝑛) ↦ ((𝑓‘(𝑥𝑛))𝐹(𝑥𝑛))))(𝐺𝑚)))
5352ad2antrl 740 . . . . . . . . 9 ((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) → (𝐺‘suc 𝑚) = (𝑚(𝑛 ∈ V, 𝑓 ∈ V ↦ (𝑥 ∈ (𝐴m suc 𝑛) ↦ ((𝑓‘(𝑥𝑛))𝐹(𝑥𝑛))))(𝐺𝑚)))
54 vex 3459 . . . . . . . . . 10 𝑚 ∈ V
55 fvex 6896 . . . . . . . . . 10 (𝐺𝑚) ∈ V
56 reseq1 5974 . . . . . . . . . . . . . . 15 (𝑥 = 𝑧 → (𝑥𝑎) = (𝑧𝑎))
5756fveq2d 6887 . . . . . . . . . . . . . 14 (𝑥 = 𝑧 → (𝑏‘(𝑥𝑎)) = (𝑏‘(𝑧𝑎)))
58 fveq1 6882 . . . . . . . . . . . . . 14 (𝑥 = 𝑧 → (𝑥𝑎) = (𝑧𝑎))
5957, 58oveq12d 7430 . . . . . . . . . . . . 13 (𝑥 = 𝑧 → ((𝑏‘(𝑥𝑎))𝐹(𝑥𝑎)) = ((𝑏‘(𝑧𝑎))𝐹(𝑧𝑎)))
6059cbvmptv 5216 . . . . . . . . . . . 12 (𝑥 ∈ (𝐴m suc 𝑎) ↦ ((𝑏‘(𝑥𝑎))𝐹(𝑥𝑎))) = (𝑧 ∈ (𝐴m suc 𝑎) ↦ ((𝑏‘(𝑧𝑎))𝐹(𝑧𝑎)))
61 suceq 6431 . . . . . . . . . . . . . . 15 (𝑎 = 𝑚 → suc 𝑎 = suc 𝑚)
6261adantr 485 . . . . . . . . . . . . . 14 ((𝑎 = 𝑚𝑏 = (𝐺𝑚)) → suc 𝑎 = suc 𝑚)
6362oveq2d 7428 . . . . . . . . . . . . 13 ((𝑎 = 𝑚𝑏 = (𝐺𝑚)) → (𝐴m suc 𝑎) = (𝐴m suc 𝑚))
64 simpr 489 . . . . . . . . . . . . . . 15 ((𝑎 = 𝑚𝑏 = (𝐺𝑚)) → 𝑏 = (𝐺𝑚))
65 reseq2 5975 . . . . . . . . . . . . . . . 16 (𝑎 = 𝑚 → (𝑧𝑎) = (𝑧𝑚))
6665adantr 485 . . . . . . . . . . . . . . 15 ((𝑎 = 𝑚𝑏 = (𝐺𝑚)) → (𝑧𝑎) = (𝑧𝑚))
6764, 66fveq12d 6890 . . . . . . . . . . . . . 14 ((𝑎 = 𝑚𝑏 = (𝐺𝑚)) → (𝑏‘(𝑧𝑎)) = ((𝐺𝑚)‘(𝑧𝑚)))
68 simpl 487 . . . . . . . . . . . . . . 15 ((𝑎 = 𝑚𝑏 = (𝐺𝑚)) → 𝑎 = 𝑚)
6968fveq2d 6887 . . . . . . . . . . . . . 14 ((𝑎 = 𝑚𝑏 = (𝐺𝑚)) → (𝑧𝑎) = (𝑧𝑚))
7067, 69oveq12d 7430 . . . . . . . . . . . . 13 ((𝑎 = 𝑚𝑏 = (𝐺𝑚)) → ((𝑏‘(𝑧𝑎))𝐹(𝑧𝑎)) = (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚)))
7163, 70mpteq12dv 5199 . . . . . . . . . . . 12 ((𝑎 = 𝑚𝑏 = (𝐺𝑚)) → (𝑧 ∈ (𝐴m suc 𝑎) ↦ ((𝑏‘(𝑧𝑎))𝐹(𝑧𝑎))) = (𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚))))
7260, 71eqtrid 2810 . . . . . . . . . . 11 ((𝑎 = 𝑚𝑏 = (𝐺𝑚)) → (𝑥 ∈ (𝐴m suc 𝑎) ↦ ((𝑏‘(𝑥𝑎))𝐹(𝑥𝑎))) = (𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚))))
73 nfcv 2925 . . . . . . . . . . . 12 𝑎(𝑥 ∈ (𝐴m suc 𝑛) ↦ ((𝑓‘(𝑥𝑛))𝐹(𝑥𝑛)))
74 nfcv 2925 . . . . . . . . . . . 12 𝑏(𝑥 ∈ (𝐴m suc 𝑛) ↦ ((𝑓‘(𝑥𝑛))𝐹(𝑥𝑛)))
75 nfcv 2925 . . . . . . . . . . . 12 𝑛(𝑥 ∈ (𝐴m suc 𝑎) ↦ ((𝑏‘(𝑥𝑎))𝐹(𝑥𝑎)))
76 nfcv 2925 . . . . . . . . . . . 12 𝑓(𝑥 ∈ (𝐴m suc 𝑎) ↦ ((𝑏‘(𝑥𝑎))𝐹(𝑥𝑎)))
77 suceq 6431 . . . . . . . . . . . . . . 15 (𝑛 = 𝑎 → suc 𝑛 = suc 𝑎)
7877adantr 485 . . . . . . . . . . . . . 14 ((𝑛 = 𝑎𝑓 = 𝑏) → suc 𝑛 = suc 𝑎)
7978oveq2d 7428 . . . . . . . . . . . . 13 ((𝑛 = 𝑎𝑓 = 𝑏) → (𝐴m suc 𝑛) = (𝐴m suc 𝑎))
80 simpr 489 . . . . . . . . . . . . . . 15 ((𝑛 = 𝑎𝑓 = 𝑏) → 𝑓 = 𝑏)
81 reseq2 5975 . . . . . . . . . . . . . . . 16 (𝑛 = 𝑎 → (𝑥𝑛) = (𝑥𝑎))
8281adantr 485 . . . . . . . . . . . . . . 15 ((𝑛 = 𝑎𝑓 = 𝑏) → (𝑥𝑛) = (𝑥𝑎))
8380, 82fveq12d 6890 . . . . . . . . . . . . . 14 ((𝑛 = 𝑎𝑓 = 𝑏) → (𝑓‘(𝑥𝑛)) = (𝑏‘(𝑥𝑎)))
84 simpl 487 . . . . . . . . . . . . . . 15 ((𝑛 = 𝑎𝑓 = 𝑏) → 𝑛 = 𝑎)
8584fveq2d 6887 . . . . . . . . . . . . . 14 ((𝑛 = 𝑎𝑓 = 𝑏) → (𝑥𝑛) = (𝑥𝑎))
8683, 85oveq12d 7430 . . . . . . . . . . . . 13 ((𝑛 = 𝑎𝑓 = 𝑏) → ((𝑓‘(𝑥𝑛))𝐹(𝑥𝑛)) = ((𝑏‘(𝑥𝑎))𝐹(𝑥𝑎)))
8779, 86mpteq12dv 5199 . . . . . . . . . . . 12 ((𝑛 = 𝑎𝑓 = 𝑏) → (𝑥 ∈ (𝐴m suc 𝑛) ↦ ((𝑓‘(𝑥𝑛))𝐹(𝑥𝑛))) = (𝑥 ∈ (𝐴m suc 𝑎) ↦ ((𝑏‘(𝑥𝑎))𝐹(𝑥𝑎))))
8873, 74, 75, 76, 87cbvmpo 7506 . . . . . . . . . . 11 (𝑛 ∈ V, 𝑓 ∈ V ↦ (𝑥 ∈ (𝐴m suc 𝑛) ↦ ((𝑓‘(𝑥𝑛))𝐹(𝑥𝑛)))) = (𝑎 ∈ V, 𝑏 ∈ V ↦ (𝑥 ∈ (𝐴m suc 𝑎) ↦ ((𝑏‘(𝑥𝑎))𝐹(𝑥𝑎))))
89 ovex 7445 . . . . . . . . . . . 12 (𝐴m suc 𝑚) ∈ V
9089mptex 7223 . . . . . . . . . . 11 (𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚))) ∈ V
9172, 88, 90ovmpoa 7567 . . . . . . . . . 10 ((𝑚 ∈ V ∧ (𝐺𝑚) ∈ V) → (𝑚(𝑛 ∈ V, 𝑓 ∈ V ↦ (𝑥 ∈ (𝐴m suc 𝑛) ↦ ((𝑓‘(𝑥𝑛))𝐹(𝑥𝑛))))(𝐺𝑚)) = (𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚))))
9254, 55, 91mp2an 704 . . . . . . . . 9 (𝑚(𝑛 ∈ V, 𝑓 ∈ V ↦ (𝑥 ∈ (𝐴m suc 𝑛) ↦ ((𝑓‘(𝑥𝑛))𝐹(𝑥𝑛))))(𝐺𝑚)) = (𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚)))
9353, 92eqtrdi 2814 . . . . . . . 8 ((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) → (𝐺‘suc 𝑚) = (𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚))))
94 fseqenlem.f . . . . . . . . . . 11 (𝜑𝐹:(𝐴 × 𝐴)–1-1-onto𝐴)
9594ad2antrr 738 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ 𝑧 ∈ (𝐴m suc 𝑚)) → 𝐹:(𝐴 × 𝐴)–1-1-onto𝐴)
96 f1of 6822 . . . . . . . . . 10 (𝐹:(𝐴 × 𝐴)–1-1-onto𝐴𝐹:(𝐴 × 𝐴)⟶𝐴)
9795, 96syl 18 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ 𝑧 ∈ (𝐴m suc 𝑚)) → 𝐹:(𝐴 × 𝐴)⟶𝐴)
98 f1f 6776 . . . . . . . . . . . 12 ((𝐺𝑚):(𝐴m 𝑚)–1-1𝐴 → (𝐺𝑚):(𝐴m 𝑚)⟶𝐴)
9998ad2antll 741 . . . . . . . . . . 11 ((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) → (𝐺𝑚):(𝐴m 𝑚)⟶𝐴)
10099adantr 485 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ 𝑧 ∈ (𝐴m suc 𝑚)) → (𝐺𝑚):(𝐴m 𝑚)⟶𝐴)
101 elmapi 8847 . . . . . . . . . . . . 13 (𝑧 ∈ (𝐴m suc 𝑚) → 𝑧:suc 𝑚𝐴)
102101adantl 486 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ 𝑧 ∈ (𝐴m suc 𝑚)) → 𝑧:suc 𝑚𝐴)
103 sssucid 6445 . . . . . . . . . . . 12 𝑚 ⊆ suc 𝑚
104 fssres 6746 . . . . . . . . . . . 12 ((𝑧:suc 𝑚𝐴𝑚 ⊆ suc 𝑚) → (𝑧𝑚):𝑚𝐴)
105102, 103, 104sylancl 597 . . . . . . . . . . 11 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ 𝑧 ∈ (𝐴m suc 𝑚)) → (𝑧𝑚):𝑚𝐴)
10644ad2antrr 738 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ 𝑧 ∈ (𝐴m suc 𝑚)) → 𝐴𝑉)
107 elmapg 8837 . . . . . . . . . . . 12 ((𝐴𝑉𝑚 ∈ V) → ((𝑧𝑚) ∈ (𝐴m 𝑚) ↔ (𝑧𝑚):𝑚𝐴))
108106, 54, 107sylancl 597 . . . . . . . . . . 11 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ 𝑧 ∈ (𝐴m suc 𝑚)) → ((𝑧𝑚) ∈ (𝐴m 𝑚) ↔ (𝑧𝑚):𝑚𝐴))
109105, 108mpbird 260 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ 𝑧 ∈ (𝐴m suc 𝑚)) → (𝑧𝑚) ∈ (𝐴m 𝑚))
110100, 109ffvelcdmd 7082 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ 𝑧 ∈ (𝐴m suc 𝑚)) → ((𝐺𝑚)‘(𝑧𝑚)) ∈ 𝐴)
11154sucid 6447 . . . . . . . . . 10 𝑚 ∈ suc 𝑚
112 ffvelcdm 7078 . . . . . . . . . 10 ((𝑧:suc 𝑚𝐴𝑚 ∈ suc 𝑚) → (𝑧𝑚) ∈ 𝐴)
113102, 111, 112sylancl 597 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ 𝑧 ∈ (𝐴m suc 𝑚)) → (𝑧𝑚) ∈ 𝐴)
11497, 110, 113fovcdmd 7584 . . . . . . . 8 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ 𝑧 ∈ (𝐴m suc 𝑚)) → (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚)) ∈ 𝐴)
11593, 114fmpt3d 7113 . . . . . . 7 ((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) → (𝐺‘suc 𝑚):(𝐴m suc 𝑚)⟶𝐴)
116 elmapi 8847 . . . . . . . . . . . . . 14 (𝑎 ∈ (𝐴m suc 𝑚) → 𝑎:suc 𝑚𝐴)
117116ad2antrl 740 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → 𝑎:suc 𝑚𝐴)
118117ffnd 6708 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → 𝑎 Fn suc 𝑚)
119 elmapi 8847 . . . . . . . . . . . . . 14 (𝑏 ∈ (𝐴m suc 𝑚) → 𝑏:suc 𝑚𝐴)
120119ad2antll 741 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → 𝑏:suc 𝑚𝐴)
121120ffnd 6708 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → 𝑏 Fn suc 𝑚)
122103a1i 11 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → 𝑚 ⊆ suc 𝑚)
123 fvreseq 7037 . . . . . . . . . . . 12 (((𝑎 Fn suc 𝑚𝑏 Fn suc 𝑚) ∧ 𝑚 ⊆ suc 𝑚) → ((𝑎𝑚) = (𝑏𝑚) ↔ ∀𝑥𝑚 (𝑎𝑥) = (𝑏𝑥)))
124118, 121, 122, 123syl21anc 850 . . . . . . . . . . 11 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝑎𝑚) = (𝑏𝑚) ↔ ∀𝑥𝑚 (𝑎𝑥) = (𝑏𝑥)))
125 fveq2 6883 . . . . . . . . . . . . . . 15 (𝑥 = 𝑚 → (𝑎𝑥) = (𝑎𝑚))
126 fveq2 6883 . . . . . . . . . . . . . . 15 (𝑥 = 𝑚 → (𝑏𝑥) = (𝑏𝑚))
127125, 126eqeq12d 2779 . . . . . . . . . . . . . 14 (𝑥 = 𝑚 → ((𝑎𝑥) = (𝑏𝑥) ↔ (𝑎𝑚) = (𝑏𝑚)))
12854, 127ralsn 4648 . . . . . . . . . . . . 13 (∀𝑥 ∈ {𝑚} (𝑎𝑥) = (𝑏𝑥) ↔ (𝑎𝑚) = (𝑏𝑚))
129128bicomi 227 . . . . . . . . . . . 12 ((𝑎𝑚) = (𝑏𝑚) ↔ ∀𝑥 ∈ {𝑚} (𝑎𝑥) = (𝑏𝑥))
130129a1i 11 . . . . . . . . . . 11 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝑎𝑚) = (𝑏𝑚) ↔ ∀𝑥 ∈ {𝑚} (𝑎𝑥) = (𝑏𝑥)))
131124, 130anbi12d 643 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (((𝑎𝑚) = (𝑏𝑚) ∧ (𝑎𝑚) = (𝑏𝑚)) ↔ (∀𝑥𝑚 (𝑎𝑥) = (𝑏𝑥) ∧ ∀𝑥 ∈ {𝑚} (𝑎𝑥) = (𝑏𝑥))))
13293adantr 485 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (𝐺‘suc 𝑚) = (𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚))))
133132fveq1d 6885 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝐺‘suc 𝑚)‘𝑎) = ((𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚)))‘𝑎))
134 reseq1 5974 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝑎 → (𝑧𝑚) = (𝑎𝑚))
135134fveq2d 6887 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑎 → ((𝐺𝑚)‘(𝑧𝑚)) = ((𝐺𝑚)‘(𝑎𝑚)))
136 fveq1 6882 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑎 → (𝑧𝑚) = (𝑎𝑚))
137135, 136oveq12d 7430 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑎 → (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚)) = (((𝐺𝑚)‘(𝑎𝑚))𝐹(𝑎𝑚)))
138 eqid 2763 . . . . . . . . . . . . . . . 16 (𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚))) = (𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚)))
139 ovex 7445 . . . . . . . . . . . . . . . 16 (((𝐺𝑚)‘(𝑎𝑚))𝐹(𝑎𝑚)) ∈ V
140137, 138, 139fvmpt 6991 . . . . . . . . . . . . . . 15 (𝑎 ∈ (𝐴m suc 𝑚) → ((𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚)))‘𝑎) = (((𝐺𝑚)‘(𝑎𝑚))𝐹(𝑎𝑚)))
141140ad2antrl 740 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚)))‘𝑎) = (((𝐺𝑚)‘(𝑎𝑚))𝐹(𝑎𝑚)))
142133, 141eqtrd 2798 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝐺‘suc 𝑚)‘𝑎) = (((𝐺𝑚)‘(𝑎𝑚))𝐹(𝑎𝑚)))
143 df-ov 7415 . . . . . . . . . . . . 13 (((𝐺𝑚)‘(𝑎𝑚))𝐹(𝑎𝑚)) = (𝐹‘⟨((𝐺𝑚)‘(𝑎𝑚)), (𝑎𝑚)⟩)
144142, 143eqtrdi 2814 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝐺‘suc 𝑚)‘𝑎) = (𝐹‘⟨((𝐺𝑚)‘(𝑎𝑚)), (𝑎𝑚)⟩))
145132fveq1d 6885 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝐺‘suc 𝑚)‘𝑏) = ((𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚)))‘𝑏))
146 reseq1 5974 . . . . . . . . . . . . . . . . . 18 (𝑧 = 𝑏 → (𝑧𝑚) = (𝑏𝑚))
147146fveq2d 6887 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑏 → ((𝐺𝑚)‘(𝑧𝑚)) = ((𝐺𝑚)‘(𝑏𝑚)))
148 fveq1 6882 . . . . . . . . . . . . . . . . 17 (𝑧 = 𝑏 → (𝑧𝑚) = (𝑏𝑚))
149147, 148oveq12d 7430 . . . . . . . . . . . . . . . 16 (𝑧 = 𝑏 → (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚)) = (((𝐺𝑚)‘(𝑏𝑚))𝐹(𝑏𝑚)))
150 ovex 7445 . . . . . . . . . . . . . . . 16 (((𝐺𝑚)‘(𝑏𝑚))𝐹(𝑏𝑚)) ∈ V
151149, 138, 150fvmpt 6991 . . . . . . . . . . . . . . 15 (𝑏 ∈ (𝐴m suc 𝑚) → ((𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚)))‘𝑏) = (((𝐺𝑚)‘(𝑏𝑚))𝐹(𝑏𝑚)))
152151ad2antll 741 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝑧 ∈ (𝐴m suc 𝑚) ↦ (((𝐺𝑚)‘(𝑧𝑚))𝐹(𝑧𝑚)))‘𝑏) = (((𝐺𝑚)‘(𝑏𝑚))𝐹(𝑏𝑚)))
153145, 152eqtrd 2798 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝐺‘suc 𝑚)‘𝑏) = (((𝐺𝑚)‘(𝑏𝑚))𝐹(𝑏𝑚)))
154 df-ov 7415 . . . . . . . . . . . . 13 (((𝐺𝑚)‘(𝑏𝑚))𝐹(𝑏𝑚)) = (𝐹‘⟨((𝐺𝑚)‘(𝑏𝑚)), (𝑏𝑚)⟩)
155153, 154eqtrdi 2814 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝐺‘suc 𝑚)‘𝑏) = (𝐹‘⟨((𝐺𝑚)‘(𝑏𝑚)), (𝑏𝑚)⟩))
156144, 155eqeq12d 2779 . . . . . . . . . . 11 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (((𝐺‘suc 𝑚)‘𝑎) = ((𝐺‘suc 𝑚)‘𝑏) ↔ (𝐹‘⟨((𝐺𝑚)‘(𝑎𝑚)), (𝑎𝑚)⟩) = (𝐹‘⟨((𝐺𝑚)‘(𝑏𝑚)), (𝑏𝑚)⟩)))
15794ad2antrr 738 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → 𝐹:(𝐴 × 𝐴)–1-1-onto𝐴)
158 f1of1 6821 . . . . . . . . . . . . . 14 (𝐹:(𝐴 × 𝐴)–1-1-onto𝐴𝐹:(𝐴 × 𝐴)–1-1𝐴)
159157, 158syl 18 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → 𝐹:(𝐴 × 𝐴)–1-1𝐴)
16099adantr 485 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (𝐺𝑚):(𝐴m 𝑚)⟶𝐴)
161 fssres 6746 . . . . . . . . . . . . . . . . 17 ((𝑎:suc 𝑚𝐴𝑚 ⊆ suc 𝑚) → (𝑎𝑚):𝑚𝐴)
162117, 103, 161sylancl 597 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (𝑎𝑚):𝑚𝐴)
16344ad2antrr 738 . . . . . . . . . . . . . . . . 17 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → 𝐴𝑉)
164 elmapg 8837 . . . . . . . . . . . . . . . . 17 ((𝐴𝑉𝑚 ∈ V) → ((𝑎𝑚) ∈ (𝐴m 𝑚) ↔ (𝑎𝑚):𝑚𝐴))
165163, 54, 164sylancl 597 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝑎𝑚) ∈ (𝐴m 𝑚) ↔ (𝑎𝑚):𝑚𝐴))
166162, 165mpbird 260 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (𝑎𝑚) ∈ (𝐴m 𝑚))
167160, 166ffvelcdmd 7082 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝐺𝑚)‘(𝑎𝑚)) ∈ 𝐴)
168 ffvelcdm 7078 . . . . . . . . . . . . . . 15 ((𝑎:suc 𝑚𝐴𝑚 ∈ suc 𝑚) → (𝑎𝑚) ∈ 𝐴)
169117, 111, 168sylancl 597 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (𝑎𝑚) ∈ 𝐴)
170167, 169opelxpd 5702 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ⟨((𝐺𝑚)‘(𝑎𝑚)), (𝑎𝑚)⟩ ∈ (𝐴 × 𝐴))
171 fssres 6746 . . . . . . . . . . . . . . . . 17 ((𝑏:suc 𝑚𝐴𝑚 ⊆ suc 𝑚) → (𝑏𝑚):𝑚𝐴)
172120, 103, 171sylancl 597 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (𝑏𝑚):𝑚𝐴)
173 elmapg 8837 . . . . . . . . . . . . . . . . 17 ((𝐴𝑉𝑚 ∈ V) → ((𝑏𝑚) ∈ (𝐴m 𝑚) ↔ (𝑏𝑚):𝑚𝐴))
174163, 54, 173sylancl 597 . . . . . . . . . . . . . . . 16 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝑏𝑚) ∈ (𝐴m 𝑚) ↔ (𝑏𝑚):𝑚𝐴))
175172, 174mpbird 260 . . . . . . . . . . . . . . 15 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (𝑏𝑚) ∈ (𝐴m 𝑚))
176160, 175ffvelcdmd 7082 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝐺𝑚)‘(𝑏𝑚)) ∈ 𝐴)
177 ffvelcdm 7078 . . . . . . . . . . . . . . 15 ((𝑏:suc 𝑚𝐴𝑚 ∈ suc 𝑚) → (𝑏𝑚) ∈ 𝐴)
178120, 111, 177sylancl 597 . . . . . . . . . . . . . 14 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (𝑏𝑚) ∈ 𝐴)
179176, 178opelxpd 5702 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ⟨((𝐺𝑚)‘(𝑏𝑚)), (𝑏𝑚)⟩ ∈ (𝐴 × 𝐴))
180 f1fveq 7262 . . . . . . . . . . . . 13 ((𝐹:(𝐴 × 𝐴)–1-1𝐴 ∧ (⟨((𝐺𝑚)‘(𝑎𝑚)), (𝑎𝑚)⟩ ∈ (𝐴 × 𝐴) ∧ ⟨((𝐺𝑚)‘(𝑏𝑚)), (𝑏𝑚)⟩ ∈ (𝐴 × 𝐴))) → ((𝐹‘⟨((𝐺𝑚)‘(𝑎𝑚)), (𝑎𝑚)⟩) = (𝐹‘⟨((𝐺𝑚)‘(𝑏𝑚)), (𝑏𝑚)⟩) ↔ ⟨((𝐺𝑚)‘(𝑎𝑚)), (𝑎𝑚)⟩ = ⟨((𝐺𝑚)‘(𝑏𝑚)), (𝑏𝑚)⟩))
181159, 170, 179, 180syl12anc 849 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝐹‘⟨((𝐺𝑚)‘(𝑎𝑚)), (𝑎𝑚)⟩) = (𝐹‘⟨((𝐺𝑚)‘(𝑏𝑚)), (𝑏𝑚)⟩) ↔ ⟨((𝐺𝑚)‘(𝑎𝑚)), (𝑎𝑚)⟩ = ⟨((𝐺𝑚)‘(𝑏𝑚)), (𝑏𝑚)⟩))
182 fvex 6896 . . . . . . . . . . . . 13 ((𝐺𝑚)‘(𝑎𝑚)) ∈ V
183 fvex 6896 . . . . . . . . . . . . 13 (𝑎𝑚) ∈ V
184182, 183opth 5460 . . . . . . . . . . . 12 (⟨((𝐺𝑚)‘(𝑎𝑚)), (𝑎𝑚)⟩ = ⟨((𝐺𝑚)‘(𝑏𝑚)), (𝑏𝑚)⟩ ↔ (((𝐺𝑚)‘(𝑎𝑚)) = ((𝐺𝑚)‘(𝑏𝑚)) ∧ (𝑎𝑚) = (𝑏𝑚)))
185181, 184bitrdi 290 . . . . . . . . . . 11 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((𝐹‘⟨((𝐺𝑚)‘(𝑎𝑚)), (𝑎𝑚)⟩) = (𝐹‘⟨((𝐺𝑚)‘(𝑏𝑚)), (𝑏𝑚)⟩) ↔ (((𝐺𝑚)‘(𝑎𝑚)) = ((𝐺𝑚)‘(𝑏𝑚)) ∧ (𝑎𝑚) = (𝑏𝑚))))
186 simplrr 789 . . . . . . . . . . . . 13 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)
187 f1fveq 7262 . . . . . . . . . . . . 13 (((𝐺𝑚):(𝐴m 𝑚)–1-1𝐴 ∧ ((𝑎𝑚) ∈ (𝐴m 𝑚) ∧ (𝑏𝑚) ∈ (𝐴m 𝑚))) → (((𝐺𝑚)‘(𝑎𝑚)) = ((𝐺𝑚)‘(𝑏𝑚)) ↔ (𝑎𝑚) = (𝑏𝑚)))
188186, 166, 175, 187syl12anc 849 . . . . . . . . . . . 12 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (((𝐺𝑚)‘(𝑎𝑚)) = ((𝐺𝑚)‘(𝑏𝑚)) ↔ (𝑎𝑚) = (𝑏𝑚)))
189188anbi1d 642 . . . . . . . . . . 11 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → ((((𝐺𝑚)‘(𝑎𝑚)) = ((𝐺𝑚)‘(𝑏𝑚)) ∧ (𝑎𝑚) = (𝑏𝑚)) ↔ ((𝑎𝑚) = (𝑏𝑚) ∧ (𝑎𝑚) = (𝑏𝑚))))
190156, 185, 1893bitrd 308 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (((𝐺‘suc 𝑚)‘𝑎) = ((𝐺‘suc 𝑚)‘𝑏) ↔ ((𝑎𝑚) = (𝑏𝑚) ∧ (𝑎𝑚) = (𝑏𝑚))))
191 eqfnfv 7027 . . . . . . . . . . . 12 ((𝑎 Fn suc 𝑚𝑏 Fn suc 𝑚) → (𝑎 = 𝑏 ↔ ∀𝑥 ∈ suc 𝑚(𝑎𝑥) = (𝑏𝑥)))
192118, 121, 191syl2anc 595 . . . . . . . . . . 11 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (𝑎 = 𝑏 ↔ ∀𝑥 ∈ suc 𝑚(𝑎𝑥) = (𝑏𝑥)))
193 df-suc 6368 . . . . . . . . . . . . 13 suc 𝑚 = (𝑚 ∪ {𝑚})
194193raleqi 3321 . . . . . . . . . . . 12 (∀𝑥 ∈ suc 𝑚(𝑎𝑥) = (𝑏𝑥) ↔ ∀𝑥 ∈ (𝑚 ∪ {𝑚})(𝑎𝑥) = (𝑏𝑥))
195 ralunb 4151 . . . . . . . . . . . 12 (∀𝑥 ∈ (𝑚 ∪ {𝑚})(𝑎𝑥) = (𝑏𝑥) ↔ (∀𝑥𝑚 (𝑎𝑥) = (𝑏𝑥) ∧ ∀𝑥 ∈ {𝑚} (𝑎𝑥) = (𝑏𝑥)))
196194, 195bitri 278 . . . . . . . . . . 11 (∀𝑥 ∈ suc 𝑚(𝑎𝑥) = (𝑏𝑥) ↔ (∀𝑥𝑚 (𝑎𝑥) = (𝑏𝑥) ∧ ∀𝑥 ∈ {𝑚} (𝑎𝑥) = (𝑏𝑥)))
197192, 196bitrdi 290 . . . . . . . . . 10 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (𝑎 = 𝑏 ↔ (∀𝑥𝑚 (𝑎𝑥) = (𝑏𝑥) ∧ ∀𝑥 ∈ {𝑚} (𝑎𝑥) = (𝑏𝑥))))
198131, 190, 1973bitr4d 314 . . . . . . . . 9 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (((𝐺‘suc 𝑚)‘𝑎) = ((𝐺‘suc 𝑚)‘𝑏) ↔ 𝑎 = 𝑏))
199198biimpd 232 . . . . . . . 8 (((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) ∧ (𝑎 ∈ (𝐴m suc 𝑚) ∧ 𝑏 ∈ (𝐴m suc 𝑚))) → (((𝐺‘suc 𝑚)‘𝑎) = ((𝐺‘suc 𝑚)‘𝑏) → 𝑎 = 𝑏))
200199ralrimivva 3208 . . . . . . 7 ((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) → ∀𝑎 ∈ (𝐴m suc 𝑚)∀𝑏 ∈ (𝐴m suc 𝑚)(((𝐺‘suc 𝑚)‘𝑎) = ((𝐺‘suc 𝑚)‘𝑏) → 𝑎 = 𝑏))
201 dff13 7254 . . . . . . 7 ((𝐺‘suc 𝑚):(𝐴m suc 𝑚)–1-1𝐴 ↔ ((𝐺‘suc 𝑚):(𝐴m suc 𝑚)⟶𝐴 ∧ ∀𝑎 ∈ (𝐴m suc 𝑚)∀𝑏 ∈ (𝐴m suc 𝑚)(((𝐺‘suc 𝑚)‘𝑎) = ((𝐺‘suc 𝑚)‘𝑏) → 𝑎 = 𝑏)))
202115, 200, 201sylanbrc 594 . . . . . 6 ((𝜑 ∧ (𝑚 ∈ ω ∧ (𝐺𝑚):(𝐴m 𝑚)–1-1𝐴)) → (𝐺‘suc 𝑚):(𝐴m suc 𝑚)–1-1𝐴)
203202expr 461 . . . . 5 ((𝜑𝑚 ∈ ω) → ((𝐺𝑚):(𝐴m 𝑚)–1-1𝐴 → (𝐺‘suc 𝑚):(𝐴m suc 𝑚)–1-1𝐴))
204203expcom 418 . . . 4 (𝑚 ∈ ω → (𝜑 → ((𝐺𝑚):(𝐴m 𝑚)–1-1𝐴 → (𝐺‘suc 𝑚):(𝐴m suc 𝑚)–1-1𝐴)))
20520, 27, 34, 51, 204finds2 7896 . . 3 (𝑦 ∈ ω → (𝜑 → (𝐺𝑦):(𝐴m 𝑦)–1-1𝐴))
2068, 205vtoclga 3542 . 2 (𝐶 ∈ ω → (𝜑 → (𝐺𝐶):(𝐴m 𝐶)–1-1𝐴))
207206impcom 412 1 ((𝜑𝐶 ∈ ω) → (𝐺𝐶):(𝐴m 𝐶)–1-1𝐴)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 209  wa 400   = wceq 1570  wcel 2143  wral 3079  Vcvv 3455  cun 3904  wss 3906  c0 4287  {csn 4590  cop 4596  cmpt 5193   × cxp 5661  cres 5665  suc csuc 6364   Fn wfn 6533  wf 6534  1-1wf1 6535  1-1-ontowf1o 6537  cfv 6538  (class class class)co 7412  cmpo 7414  ωcom 7863  seqωcseqom 8435  1oc1o 8447  m cmap 8825
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-op 4597  df-uni 4874  df-iun 4959  df-br 5111  df-opab 5175  df-mpt 5194  df-tr 5220  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-ov 7415  df-oprab 7416  df-mpo 7417  df-om 7864  df-1st 7987  df-2nd 7988  df-frecs 8279  df-wrecs 8310  df-recs 8359  df-rdg 8398  df-seqom 8436  df-1o 8454  df-map 8827
This theorem is referenced by:  fseqenlem2  10010
  Copyright terms: Public domain W3C validator