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

Theorem infxpenlem 10092
Description: Lemma for infxpen 10093. (Contributed by Mario Carneiro, 9-Mar-2013.) (Revised by Mario Carneiro, 26-Jun-2015.)
Hypotheses
Ref Expression
leweon.1 𝐿 = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ (On × On) ∧ 𝑦 ∈ (On × On)) ∧ ((1st ‘𝑥) ∈ (1st ‘𝑦) ∨ ((1st ‘𝑥) = (1st ‘𝑦) ∧ (2nd ‘𝑥) ∈ (2nd ‘𝑦))))}
r0weon.1 𝑅 = {⟨𝑧, 𝑤⟩ ∣ ((𝑧 ∈ (On × On) ∧ 𝑤 ∈ (On × On)) ∧ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∨ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∧ 𝑧𝐿𝑤)))}
infxpen.1 𝑄 = (𝑅 ∩ ((𝑎 × 𝑎) × (𝑎 × 𝑎)))
infxpen.2 (𝜑 ↔ ((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)))
infxpen.3 𝑀 = ((1st ‘𝑤) ∪ (2nd ‘𝑤))
infxpen.4 𝐽 = OrdIso(𝑄, (𝑎 × 𝑎))
Assertion
Ref Expression
infxpenlem ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → (𝐴 × 𝐴) ≈ 𝐴)
Distinct variable groups:   𝐴,𝑎   𝑤,𝐽   𝑧,𝑤,𝐿   𝑧,𝑚,𝑀   𝜑,𝑤,𝑧   𝑧,𝑄   𝑚,𝑎,𝑤,𝑥,𝑦,𝑧
Allowed substitution hints:   𝜑(𝑥, 𝑦, 𝑚, 𝑎)   𝐴(𝑥, 𝑦, 𝑧, 𝑤, 𝑚)   𝑄(𝑥, 𝑦, 𝑤, 𝑚, 𝑎)   𝑅(𝑥, 𝑦, 𝑧, 𝑤, 𝑚, 𝑎)   𝐽(𝑥, 𝑦, 𝑧, 𝑚, 𝑎)   𝐿(𝑥, 𝑦, 𝑚, 𝑎)   𝑀(𝑥, 𝑦, 𝑤, 𝑎)

Proof of Theorem infxpenlem
StepHypRef Expression
1 sseq2 3957 . . . 4 (𝑎 = 𝑚 → (ω ⊆ 𝑎 ↔ ω ⊆ 𝑚))
2 xpeq12 5676 . . . . . 6 ((𝑎 = 𝑚 ∧ 𝑎 = 𝑚) → (𝑎 × 𝑎) = (𝑚 × 𝑚))
32anidms 577 . . . . 5 (𝑎 = 𝑚 → (𝑎 × 𝑎) = (𝑚 × 𝑚))
4 id 23 . . . . 5 (𝑎 = 𝑚 → 𝑎 = 𝑚)
53, 4breq12d 5116 . . . 4 (𝑎 = 𝑚 → ((𝑎 × 𝑎) ≈ 𝑎 ↔ (𝑚 × 𝑚) ≈ 𝑚))
61, 5imbi12d 347 . . 3 (𝑎 = 𝑚 → ((ω ⊆ 𝑎 → (𝑎 × 𝑎) ≈ 𝑎) ↔ (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)))
7 sseq2 3957 . . . 4 (𝑎 = 𝐴 → (ω ⊆ 𝑎 ↔ ω ⊆ 𝐴))
8 xpeq12 5676 . . . . . 6 ((𝑎 = 𝐴 ∧ 𝑎 = 𝐴) → (𝑎 × 𝑎) = (𝐴 × 𝐴))
98anidms 577 . . . . 5 (𝑎 = 𝐴 → (𝑎 × 𝑎) = (𝐴 × 𝐴))
10 id 23 . . . . 5 (𝑎 = 𝐴 → 𝑎 = 𝐴)
119, 10breq12d 5116 . . . 4 (𝑎 = 𝐴 → ((𝑎 × 𝑎) ≈ 𝑎 ↔ (𝐴 × 𝐴) ≈ 𝐴))
127, 11imbi12d 347 . . 3 (𝑎 = 𝐴 → ((ω ⊆ 𝑎 → (𝑎 × 𝑎) ≈ 𝑎) ↔ (ω ⊆ 𝐴 → (𝐴 × 𝐴) ≈ 𝐴)))
13 infxpen.2 . . . . . . . 8 (𝜑 ↔ ((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)))
14 vex 3455 . . . . . . . . . . . . 13 𝑎 ∈ V
1514, 14xpex 7767 . . . . . . . . . . . 12 (𝑎 × 𝑎) ∈ V
16 simpll 779 . . . . . . . . . . . . . . . . . 18 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → 𝑎 ∈ On)
1713, 16sylbi 220 . . . . . . . . . . . . . . . . 17 (𝜑 → 𝑎 ∈ On)
18 onss 7799 . . . . . . . . . . . . . . . . 17 (𝑎 ∈ On → 𝑎 ⊆ On)
1917, 18syl 18 . . . . . . . . . . . . . . . 16 (𝜑 → 𝑎 ⊆ On)
20 xpss12 5666 . . . . . . . . . . . . . . . 16 ((𝑎 ⊆ On ∧ 𝑎 ⊆ On) → (𝑎 × 𝑎) ⊆ (On × On))
2119, 19, 20syl2anc 596 . . . . . . . . . . . . . . 15 (𝜑 → (𝑎 × 𝑎) ⊆ (On × On))
22 leweon.1 . . . . . . . . . . . . . . . . 17 𝐿 = {⟨𝑥, 𝑦⟩ ∣ ((𝑥 ∈ (On × On) ∧ 𝑦 ∈ (On × On)) ∧ ((1st ‘𝑥) ∈ (1st ‘𝑦) ∨ ((1st ‘𝑥) = (1st ‘𝑦) ∧ (2nd ‘𝑥) ∈ (2nd ‘𝑦))))}
23 r0weon.1 . . . . . . . . . . . . . . . . 17 𝑅 = {⟨𝑧, 𝑤⟩ ∣ ((𝑧 ∈ (On × On) ∧ 𝑤 ∈ (On × On)) ∧ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∨ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∧ 𝑧𝐿𝑤)))}
2422, 23r0weon 10091 . . . . . . . . . . . . . . . 16 (𝑅 We (On × On) ∧ 𝑅 Se (On × On))
2524simpli 489 . . . . . . . . . . . . . . 15 𝑅 We (On × On)
26 wess 5637 . . . . . . . . . . . . . . 15 ((𝑎 × 𝑎) ⊆ (On × On) → (𝑅 We (On × On) → 𝑅 We (𝑎 × 𝑎)))
2721, 25, 26mpisyl 22 . . . . . . . . . . . . . 14 (𝜑 → 𝑅 We (𝑎 × 𝑎))
28 weinxp 5736 . . . . . . . . . . . . . 14 (𝑅 We (𝑎 × 𝑎) ↔ (𝑅 ∩ ((𝑎 × 𝑎) × (𝑎 × 𝑎))) We (𝑎 × 𝑎))
2927, 28sylib 221 . . . . . . . . . . . . 13 (𝜑 → (𝑅 ∩ ((𝑎 × 𝑎) × (𝑎 × 𝑎))) We (𝑎 × 𝑎))
30 infxpen.1 . . . . . . . . . . . . . 14 𝑄 = (𝑅 ∩ ((𝑎 × 𝑎) × (𝑎 × 𝑎)))
31 weeq1 5638 . . . . . . . . . . . . . 14 (𝑄 = (𝑅 ∩ ((𝑎 × 𝑎) × (𝑎 × 𝑎))) → (𝑄 We (𝑎 × 𝑎) ↔ (𝑅 ∩ ((𝑎 × 𝑎) × (𝑎 × 𝑎))) We (𝑎 × 𝑎)))
3230, 31ax-mp 5 . . . . . . . . . . . . 13 (𝑄 We (𝑎 × 𝑎) ↔ (𝑅 ∩ ((𝑎 × 𝑎) × (𝑎 × 𝑎))) We (𝑎 × 𝑎))
3329, 32sylibr 237 . . . . . . . . . . . 12 (𝜑 → 𝑄 We (𝑎 × 𝑎))
34 infxpen.4 . . . . . . . . . . . . 13 𝐽 = OrdIso(𝑄, (𝑎 × 𝑎))
3534oiiso 9531 . . . . . . . . . . . 12 (((𝑎 × 𝑎) ∈ V ∧ 𝑄 We (𝑎 × 𝑎)) → 𝐽 Isom E , 𝑄 (dom 𝐽, (𝑎 × 𝑎)))
3615, 33, 35sylancr 599 . . . . . . . . . . 11 (𝜑 → 𝐽 Isom E , 𝑄 (dom 𝐽, (𝑎 × 𝑎)))
37 isof1o 7331 . . . . . . . . . . 11 (𝐽 Isom E , 𝑄 (dom 𝐽, (𝑎 × 𝑎)) → 𝐽:dom 𝐽–1-1-onto→(𝑎 × 𝑎))
38 f1ocnv 6837 . . . . . . . . . . 11 (𝐽:dom 𝐽–1-1-onto→(𝑎 × 𝑎) → ◡𝐽:(𝑎 × 𝑎)–1-1-onto→dom 𝐽)
39 f1of1 6823 . . . . . . . . . . 11 (◡𝐽:(𝑎 × 𝑎)–1-1-onto→dom 𝐽 → ◡𝐽:(𝑎 × 𝑎)–1-1→dom 𝐽)
4036, 37, 38, 394syl 20 . . . . . . . . . 10 (𝜑 → ◡𝐽:(𝑎 × 𝑎)–1-1→dom 𝐽)
41 f1f1orn 6836 . . . . . . . . . 10 (◡𝐽:(𝑎 × 𝑎)–1-1→dom 𝐽 → ◡𝐽:(𝑎 × 𝑎)–1-1-onto→ran ◡𝐽)
4215f1oen 8999 . . . . . . . . . 10 (◡𝐽:(𝑎 × 𝑎)–1-1-onto→ran ◡𝐽 → (𝑎 × 𝑎) ≈ ran ◡𝐽)
4340, 41, 423syl 19 . . . . . . . . 9 (𝜑 → (𝑎 × 𝑎) ≈ ran ◡𝐽)
44 f1ofn 6825 . . . . . . . . . . 11 (◡𝐽:(𝑎 × 𝑎)–1-1-onto→dom 𝐽 → ◡𝐽 Fn (𝑎 × 𝑎))
4536, 37, 38, 444syl 20 . . . . . . . . . 10 (𝜑 → ◡𝐽 Fn (𝑎 × 𝑎))
4636adantr 486 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → 𝐽 Isom E , 𝑄 (dom 𝐽, (𝑎 × 𝑎)))
4737, 38, 393syl 19 . . . . . . . . . . . . . . . . . 18 (𝐽 Isom E , 𝑄 (dom 𝐽, (𝑎 × 𝑎)) → ◡𝐽:(𝑎 × 𝑎)–1-1→dom 𝐽)
48 cnvimass 6198 . . . . . . . . . . . . . . . . . . 19 (◡𝑄 “ {𝑤}) ⊆ dom 𝑄
49 inss2 4183 . . . . . . . . . . . . . . . . . . . . . 22 (𝑅 ∩ ((𝑎 × 𝑎) × (𝑎 × 𝑎))) ⊆ ((𝑎 × 𝑎) × (𝑎 × 𝑎))
5030, 49eqsstri 3977 . . . . . . . . . . . . . . . . . . . . 21 𝑄 ⊆ ((𝑎 × 𝑎) × (𝑎 × 𝑎))
51 dmss 5884 . . . . . . . . . . . . . . . . . . . . 21 (𝑄 ⊆ ((𝑎 × 𝑎) × (𝑎 × 𝑎)) → dom 𝑄 ⊆ dom ((𝑎 × 𝑎) × (𝑎 × 𝑎)))
5250, 51ax-mp 5 . . . . . . . . . . . . . . . . . . . 20 dom 𝑄 ⊆ dom ((𝑎 × 𝑎) × (𝑎 × 𝑎))
53 dmxpid 5912 . . . . . . . . . . . . . . . . . . . 20 dom ((𝑎 × 𝑎) × (𝑎 × 𝑎)) = (𝑎 × 𝑎)
5452, 53sseqtri 3979 . . . . . . . . . . . . . . . . . . 19 dom 𝑄 ⊆ (𝑎 × 𝑎)
5548, 54sstri 3940 . . . . . . . . . . . . . . . . . 18 (◡𝑄 “ {𝑤}) ⊆ (𝑎 × 𝑎)
56 f1ores 6839 . . . . . . . . . . . . . . . . . 18 ((◡𝐽:(𝑎 × 𝑎)–1-1→dom 𝐽 ∧ (◡𝑄 “ {𝑤}) ⊆ (𝑎 × 𝑎)) → (◡𝐽 ↾ (◡𝑄 “ {𝑤})):(◡𝑄 “ {𝑤})–1-1-onto→(◡𝐽 “ (◡𝑄 “ {𝑤})))
5747, 55, 56sylancl 598 . . . . . . . . . . . . . . . . 17 (𝐽 Isom E , 𝑄 (dom 𝐽, (𝑎 × 𝑎)) → (◡𝐽 ↾ (◡𝑄 “ {𝑤})):(◡𝑄 “ {𝑤})–1-1-onto→(◡𝐽 “ (◡𝑄 “ {𝑤})))
5815, 15xpex 7767 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑎 × 𝑎) × (𝑎 × 𝑎)) ∈ V
5958inex2 5278 . . . . . . . . . . . . . . . . . . . . 21 (𝑅 ∩ ((𝑎 × 𝑎) × (𝑎 × 𝑎))) ∈ V
6030, 59eqeltri 2857 . . . . . . . . . . . . . . . . . . . 20 𝑄 ∈ V
6160cnvex 7937 . . . . . . . . . . . . . . . . . . 19 ◡𝑄 ∈ V
6261imaex 7926 . . . . . . . . . . . . . . . . . 18 (◡𝑄 “ {𝑤}) ∈ V
6362f1oen 8999 . . . . . . . . . . . . . . . . 17 ((◡𝐽 ↾ (◡𝑄 “ {𝑤})):(◡𝑄 “ {𝑤})–1-1-onto→(◡𝐽 “ (◡𝑄 “ {𝑤})) → (◡𝑄 “ {𝑤}) ≈ (◡𝐽 “ (◡𝑄 “ {𝑤})))
6446, 57, 633syl 19 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝑄 “ {𝑤}) ≈ (◡𝐽 “ (◡𝑄 “ {𝑤})))
65 sseqin2 4169 . . . . . . . . . . . . . . . . . . 19 ((◡𝑄 “ {𝑤}) ⊆ (𝑎 × 𝑎) ↔ ((𝑎 × 𝑎) ∩ (◡𝑄 “ {𝑤})) = (◡𝑄 “ {𝑤}))
6655, 65mpbi 233 . . . . . . . . . . . . . . . . . 18 ((𝑎 × 𝑎) ∩ (◡𝑄 “ {𝑤})) = (◡𝑄 “ {𝑤})
6766imaeq2i 6050 . . . . . . . . . . . . . . . . 17 (◡𝐽 “ ((𝑎 × 𝑎) ∩ (◡𝑄 “ {𝑤}))) = (◡𝐽 “ (◡𝑄 “ {𝑤}))
68 isocnv 7338 . . . . . . . . . . . . . . . . . . . 20 (𝐽 Isom E , 𝑄 (dom 𝐽, (𝑎 × 𝑎)) → ◡𝐽 Isom 𝑄, E ((𝑎 × 𝑎), dom 𝐽))
6946, 68syl 18 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → ◡𝐽 Isom 𝑄, E ((𝑎 × 𝑎), dom 𝐽))
70 simpr 490 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → 𝑤 ∈ (𝑎 × 𝑎))
71 isoini 7346 . . . . . . . . . . . . . . . . . . 19 ((◡𝐽 Isom 𝑄, E ((𝑎 × 𝑎), dom 𝐽) ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝐽 “ ((𝑎 × 𝑎) ∩ (◡𝑄 “ {𝑤}))) = (dom 𝐽 ∩ (◡ E “ {(◡𝐽‘𝑤)})))
7269, 70, 71syl2anc 596 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝐽 “ ((𝑎 × 𝑎) ∩ (◡𝑄 “ {𝑤}))) = (dom 𝐽 ∩ (◡ E “ {(◡𝐽‘𝑤)})))
73 fvex 6898 . . . . . . . . . . . . . . . . . . . . 21 (◡𝐽‘𝑤) ∈ V
7473epini 6094 . . . . . . . . . . . . . . . . . . . 20 (◡ E “ {(◡𝐽‘𝑤)}) = (◡𝐽‘𝑤)
7574ineq2i 4163 . . . . . . . . . . . . . . . . . . 19 (dom 𝐽 ∩ (◡ E “ {(◡𝐽‘𝑤)})) = (dom 𝐽 ∩ (◡𝐽‘𝑤))
7634oicl 9523 . . . . . . . . . . . . . . . . . . . . 21 Ord dom 𝐽
77 f1of 6824 . . . . . . . . . . . . . . . . . . . . . . 23 (◡𝐽:(𝑎 × 𝑎)–1-1-onto→dom 𝐽 → ◡𝐽:(𝑎 × 𝑎)⟶dom 𝐽)
7836, 37, 38, 774syl 20 . . . . . . . . . . . . . . . . . . . . . 22 (𝜑 → ◡𝐽:(𝑎 × 𝑎)⟶dom 𝐽)
7978ffvelcdmda 7084 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝐽‘𝑤) ∈ dom 𝐽)
80 ordelss 6378 . . . . . . . . . . . . . . . . . . . . 21 ((Ord dom 𝐽 ∧ (◡𝐽‘𝑤) ∈ dom 𝐽) → (◡𝐽‘𝑤) ⊆ dom 𝐽)
8176, 79, 80sylancr 599 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝐽‘𝑤) ⊆ dom 𝐽)
82 sseqin2 4169 . . . . . . . . . . . . . . . . . . . 20 ((◡𝐽‘𝑤) ⊆ dom 𝐽 ↔ (dom 𝐽 ∩ (◡𝐽‘𝑤)) = (◡𝐽‘𝑤))
8381, 82sylib 221 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (dom 𝐽 ∩ (◡𝐽‘𝑤)) = (◡𝐽‘𝑤))
8475, 83eqtrid 2808 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (dom 𝐽 ∩ (◡ E “ {(◡𝐽‘𝑤)})) = (◡𝐽‘𝑤))
8572, 84eqtrd 2796 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝐽 “ ((𝑎 × 𝑎) ∩ (◡𝑄 “ {𝑤}))) = (◡𝐽‘𝑤))
8667, 85eqtr3id 2810 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝐽 “ (◡𝑄 “ {𝑤})) = (◡𝐽‘𝑤))
8764, 86breqtrd 5131 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝑄 “ {𝑤}) ≈ (◡𝐽‘𝑤))
8887ensymd 9032 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝐽‘𝑤) ≈ (◡𝑄 “ {𝑤}))
89 infxpen.3 . . . . . . . . . . . . . . . . . . 19 𝑀 = ((1st ‘𝑤) ∪ (2nd ‘𝑤))
90 fvex 6898 . . . . . . . . . . . . . . . . . . . 20 (1st ‘𝑤) ∈ V
91 fvex 6898 . . . . . . . . . . . . . . . . . . . 20 (2nd ‘𝑤) ∈ V
9290, 91unex 7761 . . . . . . . . . . . . . . . . . . 19 ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∈ V
9389, 92eqeltri 2857 . . . . . . . . . . . . . . . . . 18 𝑀 ∈ V
9493sucex 7820 . . . . . . . . . . . . . . . . 17 suc 𝑀 ∈ V
9594, 94xpex 7767 . . . . . . . . . . . . . . . 16 (suc 𝑀 × suc 𝑀) ∈ V
96 xpss 5667 . . . . . . . . . . . . . . . . . . . 20 (𝑎 × 𝑎) ⊆ (V × V)
97 simp3 1156 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → 𝑧 ∈ (◡𝑄 “ {𝑤}))
98 vex 3455 . . . . . . . . . . . . . . . . . . . . . . . 24 𝑧 ∈ V
9998eliniseg 6092 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑤 ∈ V → (𝑧 ∈ (◡𝑄 “ {𝑤}) ↔ 𝑧𝑄𝑤))
10099elv 3456 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 ∈ (◡𝑄 “ {𝑤}) ↔ 𝑧𝑄𝑤)
10197, 100sylib 221 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → 𝑧𝑄𝑤)
10230breqi 5109 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧𝑄𝑤 ↔ 𝑧(𝑅 ∩ ((𝑎 × 𝑎) × (𝑎 × 𝑎)))𝑤)
103 brin 5157 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧(𝑅 ∩ ((𝑎 × 𝑎) × (𝑎 × 𝑎)))𝑤 ↔ (𝑧𝑅𝑤 ∧ 𝑧((𝑎 × 𝑎) × (𝑎 × 𝑎))𝑤))
104102, 103bitri 278 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧𝑄𝑤 ↔ (𝑧𝑅𝑤 ∧ 𝑧((𝑎 × 𝑎) × (𝑎 × 𝑎))𝑤))
105104simprbi 503 . . . . . . . . . . . . . . . . . . . . 21 (𝑧𝑄𝑤 → 𝑧((𝑎 × 𝑎) × (𝑎 × 𝑎))𝑤)
106 brxp 5700 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧((𝑎 × 𝑎) × (𝑎 × 𝑎))𝑤 ↔ (𝑧 ∈ (𝑎 × 𝑎) ∧ 𝑤 ∈ (𝑎 × 𝑎)))
107106simplbi 502 . . . . . . . . . . . . . . . . . . . . 21 (𝑧((𝑎 × 𝑎) × (𝑎 × 𝑎))𝑤 → 𝑧 ∈ (𝑎 × 𝑎))
108101, 105, 1073syl 19 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → 𝑧 ∈ (𝑎 × 𝑎))
10996, 108sselid 3929 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → 𝑧 ∈ (V × V))
11017adantr 486 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → 𝑎 ∈ On)
1111103adant3 1150 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → 𝑎 ∈ On)
112 xp1st 8033 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 ∈ (𝑎 × 𝑎) → (1st ‘𝑧) ∈ 𝑎)
113 onelon 6387 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑎 ∈ On ∧ (1st ‘𝑧) ∈ 𝑎) → (1st ‘𝑧) ∈ On)
114112, 113sylan2 605 . . . . . . . . . . . . . . . . . . . . 21 ((𝑎 ∈ On ∧ 𝑧 ∈ (𝑎 × 𝑎)) → (1st ‘𝑧) ∈ On)
115111, 108, 114syl2anc 596 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → (1st ‘𝑧) ∈ On)
116 eloni 6372 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑎 ∈ On → Ord 𝑎)
117 elxp7 8036 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑤 ∈ (𝑎 × 𝑎) ↔ (𝑤 ∈ (V × V) ∧ ((1st ‘𝑤) ∈ 𝑎 ∧ (2nd ‘𝑤) ∈ 𝑎)))
118117simprbi 503 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑤 ∈ (𝑎 × 𝑎) → ((1st ‘𝑤) ∈ 𝑎 ∧ (2nd ‘𝑤) ∈ 𝑎))
119 ordunel 7838 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((Ord 𝑎 ∧ (1st ‘𝑤) ∈ 𝑎 ∧ (2nd ‘𝑤) ∈ 𝑎) → ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∈ 𝑎)
1201193expib 1140 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (Ord 𝑎 → (((1st ‘𝑤) ∈ 𝑎 ∧ (2nd ‘𝑤) ∈ 𝑎) → ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∈ 𝑎))
121116, 118, 120syl2im 41 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑎 ∈ On → (𝑤 ∈ (𝑎 × 𝑎) → ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∈ 𝑎))
122110, 70, 121sylc 66 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∈ 𝑎)
12389, 122eqeltrid 2865 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → 𝑀 ∈ 𝑎)
124 simprr 785 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)
12513, 124sylbi 220 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)
126 simprl 783 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → ω ⊆ 𝑎)
12713, 126sylbi 220 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → ω ⊆ 𝑎)
128 iscard 10056 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((card‘𝑎) = 𝑎 ↔ (𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎))
129 cardlim 10053 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (ω ⊆ (card‘𝑎) ↔ Lim (card‘𝑎))
130 sseq2 3957 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((card‘𝑎) = 𝑎 → (ω ⊆ (card‘𝑎) ↔ ω ⊆ 𝑎))
131 limeq 6374 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((card‘𝑎) = 𝑎 → (Lim (card‘𝑎) ↔ Lim 𝑎))
132130, 131bibi12d 348 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((card‘𝑎) = 𝑎 → ((ω ⊆ (card‘𝑎) ↔ Lim (card‘𝑎)) ↔ (ω ⊆ 𝑎 ↔ Lim 𝑎)))
133129, 132mpbii 236 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((card‘𝑎) = 𝑎 → (ω ⊆ 𝑎 ↔ Lim 𝑎))
134128, 133sylbir 238 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎) → (ω ⊆ 𝑎 ↔ Lim 𝑎))
135134biimpa 482 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎) ∧ ω ⊆ 𝑎) → Lim 𝑎)
13617, 125, 127, 135syl21anc 851 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → Lim 𝑎)
137136adantr 486 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → Lim 𝑎)
138 limsuc 7860 . . . . . . . . . . . . . . . . . . . . . . . 24 (Lim 𝑎 → (𝑀 ∈ 𝑎 ↔ suc 𝑀 ∈ 𝑎))
139137, 138syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (𝑀 ∈ 𝑎 ↔ suc 𝑀 ∈ 𝑎))
140123, 139mpbid 235 . . . . . . . . . . . . . . . . . . . . . 22 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → suc 𝑀 ∈ 𝑎)
141 onelon 6387 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑎 ∈ On ∧ suc 𝑀 ∈ 𝑎) → suc 𝑀 ∈ On)
14217, 140, 141syl2an2r 698 . . . . . . . . . . . . . . . . . . . . 21 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → suc 𝑀 ∈ On)
1431423adant3 1150 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → suc 𝑀 ∈ On)
144 ssun1 4124 . . . . . . . . . . . . . . . . . . . . 21 (1st ‘𝑧) ⊆ ((1st ‘𝑧) ∪ (2nd ‘𝑧))
145144a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → (1st ‘𝑧) ⊆ ((1st ‘𝑧) ∪ (2nd ‘𝑧)))
146104simplbi 502 . . . . . . . . . . . . . . . . . . . . 21 (𝑧𝑄𝑤 → 𝑧𝑅𝑤)
147 df-br 5104 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑧𝑅𝑤 ↔ ⟨𝑧, 𝑤⟩ ∈ 𝑅)
14823eleq2i 2853 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (⟨𝑧, 𝑤⟩ ∈ 𝑅 ↔ ⟨𝑧, 𝑤⟩ ∈ {⟨𝑧, 𝑤⟩ ∣ ((𝑧 ∈ (On × On) ∧ 𝑤 ∈ (On × On)) ∧ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∨ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∧ 𝑧𝐿𝑤)))})
149 opabidw 5498 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (⟨𝑧, 𝑤⟩ ∈ {⟨𝑧, 𝑤⟩ ∣ ((𝑧 ∈ (On × On) ∧ 𝑤 ∈ (On × On)) ∧ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∨ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∧ 𝑧𝐿𝑤)))} ↔ ((𝑧 ∈ (On × On) ∧ 𝑤 ∈ (On × On)) ∧ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∨ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∧ 𝑧𝐿𝑤))))
150147, 148, 1493bitri 300 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑧𝑅𝑤 ↔ ((𝑧 ∈ (On × On) ∧ 𝑤 ∈ (On × On)) ∧ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∨ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∧ 𝑧𝐿𝑤))))
151150simprbi 503 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑧𝑅𝑤 → (((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∨ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∧ 𝑧𝐿𝑤)))
152 simpl 488 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∧ 𝑧𝐿𝑤) → ((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤)))
153152orim2i 924 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∨ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∧ 𝑧𝐿𝑤)) → (((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∨ ((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤))))
154151, 153syl 18 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧𝑅𝑤 → (((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∨ ((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤))))
155 fvex 6898 . . . . . . . . . . . . . . . . . . . . . . . . 25 (1st ‘𝑧) ∈ V
156 fvex 6898 . . . . . . . . . . . . . . . . . . . . . . . . 25 (2nd ‘𝑧) ∈ V
157155, 156unex 7761 . . . . . . . . . . . . . . . . . . . . . . . 24 ((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ V
158157elsuc 6435 . . . . . . . . . . . . . . . . . . . . . . 23 (((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ suc ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ↔ (((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ ((1st ‘𝑤) ∪ (2nd ‘𝑤)) ∨ ((1st ‘𝑧) ∪ (2nd ‘𝑧)) = ((1st ‘𝑤) ∪ (2nd ‘𝑤))))
159154, 158sylibr 237 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧𝑅𝑤 → ((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ suc ((1st ‘𝑤) ∪ (2nd ‘𝑤)))
160 suceq 6431 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑀 = ((1st ‘𝑤) ∪ (2nd ‘𝑤)) → suc 𝑀 = suc ((1st ‘𝑤) ∪ (2nd ‘𝑤)))
16189, 160ax-mp 5 . . . . . . . . . . . . . . . . . . . . . 22 suc 𝑀 = suc ((1st ‘𝑤) ∪ (2nd ‘𝑤))
162159, 161eleqtrrdi 2872 . . . . . . . . . . . . . . . . . . . . 21 (𝑧𝑅𝑤 → ((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ suc 𝑀)
163101, 146, 1623syl 19 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → ((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ suc 𝑀)
164 ontr2 6411 . . . . . . . . . . . . . . . . . . . . 21 (((1st ‘𝑧) ∈ On ∧ suc 𝑀 ∈ On) → (((1st ‘𝑧) ⊆ ((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∧ ((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ suc 𝑀) → (1st ‘𝑧) ∈ suc 𝑀))
165164imp 412 . . . . . . . . . . . . . . . . . . . 20 ((((1st ‘𝑧) ∈ On ∧ suc 𝑀 ∈ On) ∧ ((1st ‘𝑧) ⊆ ((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∧ ((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ suc 𝑀)) → (1st ‘𝑧) ∈ suc 𝑀)
166115, 143, 145, 163, 165syl22anc 852 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → (1st ‘𝑧) ∈ suc 𝑀)
167 xp2nd 8034 . . . . . . . . . . . . . . . . . . . . . 22 (𝑧 ∈ (𝑎 × 𝑎) → (2nd ‘𝑧) ∈ 𝑎)
168 onelon 6387 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑎 ∈ On ∧ (2nd ‘𝑧) ∈ 𝑎) → (2nd ‘𝑧) ∈ On)
169167, 168sylan2 605 . . . . . . . . . . . . . . . . . . . . 21 ((𝑎 ∈ On ∧ 𝑧 ∈ (𝑎 × 𝑎)) → (2nd ‘𝑧) ∈ On)
170111, 108, 169syl2anc 596 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → (2nd ‘𝑧) ∈ On)
171 ssun2 4125 . . . . . . . . . . . . . . . . . . . . 21 (2nd ‘𝑧) ⊆ ((1st ‘𝑧) ∪ (2nd ‘𝑧))
172171a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → (2nd ‘𝑧) ⊆ ((1st ‘𝑧) ∪ (2nd ‘𝑧)))
173 ontr2 6411 . . . . . . . . . . . . . . . . . . . . 21 (((2nd ‘𝑧) ∈ On ∧ suc 𝑀 ∈ On) → (((2nd ‘𝑧) ⊆ ((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∧ ((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ suc 𝑀) → (2nd ‘𝑧) ∈ suc 𝑀))
174173imp 412 . . . . . . . . . . . . . . . . . . . 20 ((((2nd ‘𝑧) ∈ On ∧ suc 𝑀 ∈ On) ∧ ((2nd ‘𝑧) ⊆ ((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∧ ((1st ‘𝑧) ∪ (2nd ‘𝑧)) ∈ suc 𝑀)) → (2nd ‘𝑧) ∈ suc 𝑀)
175170, 143, 172, 163, 174syl22anc 852 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → (2nd ‘𝑧) ∈ suc 𝑀)
176 elxp7 8036 . . . . . . . . . . . . . . . . . . . 20 (𝑧 ∈ (suc 𝑀 × suc 𝑀) ↔ (𝑧 ∈ (V × V) ∧ ((1st ‘𝑧) ∈ suc 𝑀 ∧ (2nd ‘𝑧) ∈ suc 𝑀)))
177176biimpri 231 . . . . . . . . . . . . . . . . . . 19 ((𝑧 ∈ (V × V) ∧ ((1st ‘𝑧) ∈ suc 𝑀 ∧ (2nd ‘𝑧) ∈ suc 𝑀)) → 𝑧 ∈ (suc 𝑀 × suc 𝑀))
178109, 166, 175, 177syl12anc 850 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎) ∧ 𝑧 ∈ (◡𝑄 “ {𝑤})) → 𝑧 ∈ (suc 𝑀 × suc 𝑀))
1791783expia 1139 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (𝑧 ∈ (◡𝑄 “ {𝑤}) → 𝑧 ∈ (suc 𝑀 × suc 𝑀)))
180179ssrdv 3937 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝑄 “ {𝑤}) ⊆ (suc 𝑀 × suc 𝑀))
181 ssdomg 9027 . . . . . . . . . . . . . . . 16 ((suc 𝑀 × suc 𝑀) ∈ V → ((◡𝑄 “ {𝑤}) ⊆ (suc 𝑀 × suc 𝑀) → (◡𝑄 “ {𝑤}) ≼ (suc 𝑀 × suc 𝑀)))
18295, 180, 181mpsyl 69 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝑄 “ {𝑤}) ≼ (suc 𝑀 × suc 𝑀))
183127adantr 486 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → ω ⊆ 𝑎)
184 nnfi 9183 . . . . . . . . . . . . . . . . . . . 20 (suc 𝑀 ∈ ω → suc 𝑀 ∈ Fin)
185 xpfi 9311 . . . . . . . . . . . . . . . . . . . . . 22 ((suc 𝑀 ∈ Fin ∧ suc 𝑀 ∈ Fin) → (suc 𝑀 × suc 𝑀) ∈ Fin)
186185anidms 577 . . . . . . . . . . . . . . . . . . . . 21 (suc 𝑀 ∈ Fin → (suc 𝑀 × suc 𝑀) ∈ Fin)
187 isfinite 9653 . . . . . . . . . . . . . . . . . . . . 21 ((suc 𝑀 × suc 𝑀) ∈ Fin ↔ (suc 𝑀 × suc 𝑀) ≺ ω)
188186, 187sylib 221 . . . . . . . . . . . . . . . . . . . 20 (suc 𝑀 ∈ Fin → (suc 𝑀 × suc 𝑀) ≺ ω)
189184, 188syl 18 . . . . . . . . . . . . . . . . . . 19 (suc 𝑀 ∈ ω → (suc 𝑀 × suc 𝑀) ≺ ω)
190 ssdomg 9027 . . . . . . . . . . . . . . . . . . . 20 (𝑎 ∈ V → (ω ⊆ 𝑎 → ω ≼ 𝑎))
191190elv 3456 . . . . . . . . . . . . . . . . . . 19 (ω ⊆ 𝑎 → ω ≼ 𝑎)
192 sdomdomtr 9129 . . . . . . . . . . . . . . . . . . 19 (((suc 𝑀 × suc 𝑀) ≺ ω ∧ ω ≼ 𝑎) → (suc 𝑀 × suc 𝑀) ≺ 𝑎)
193189, 191, 192syl2an 608 . . . . . . . . . . . . . . . . . 18 ((suc 𝑀 ∈ ω ∧ ω ⊆ 𝑎) → (suc 𝑀 × suc 𝑀) ≺ 𝑎)
194193expcom 419 . . . . . . . . . . . . . . . . 17 (ω ⊆ 𝑎 → (suc 𝑀 ∈ ω → (suc 𝑀 × suc 𝑀) ≺ 𝑎))
195183, 194syl 18 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (suc 𝑀 ∈ ω → (suc 𝑀 × suc 𝑀) ≺ 𝑎))
196 breq1 5106 . . . . . . . . . . . . . . . . . 18 (𝑚 = suc 𝑀 → (𝑚 ≺ 𝑎 ↔ suc 𝑀 ≺ 𝑎))
197125adantr 486 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)
198196, 197, 140rspcdva 3578 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → suc 𝑀 ≺ 𝑎)
199 omelon 9647 . . . . . . . . . . . . . . . . . . 19 ω ∈ On
200 ontri1 6397 . . . . . . . . . . . . . . . . . . 19 ((ω ∈ On ∧ suc 𝑀 ∈ On) → (ω ⊆ suc 𝑀 ↔ ¬ suc 𝑀 ∈ ω))
201199, 142, 200sylancr 599 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (ω ⊆ suc 𝑀 ↔ ¬ suc 𝑀 ∈ ω))
202 sseq2 3957 . . . . . . . . . . . . . . . . . . . 20 (𝑚 = suc 𝑀 → (ω ⊆ 𝑚 ↔ ω ⊆ suc 𝑀))
203 xpeq12 5676 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑚 = suc 𝑀 ∧ 𝑚 = suc 𝑀) → (𝑚 × 𝑚) = (suc 𝑀 × suc 𝑀))
204203anidms 577 . . . . . . . . . . . . . . . . . . . . 21 (𝑚 = suc 𝑀 → (𝑚 × 𝑚) = (suc 𝑀 × suc 𝑀))
205 id 23 . . . . . . . . . . . . . . . . . . . . 21 (𝑚 = suc 𝑀 → 𝑚 = suc 𝑀)
206204, 205breq12d 5116 . . . . . . . . . . . . . . . . . . . 20 (𝑚 = suc 𝑀 → ((𝑚 × 𝑚) ≈ 𝑚 ↔ (suc 𝑀 × suc 𝑀) ≈ suc 𝑀))
207202, 206imbi12d 347 . . . . . . . . . . . . . . . . . . 19 (𝑚 = suc 𝑀 → ((ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) ↔ (ω ⊆ suc 𝑀 → (suc 𝑀 × suc 𝑀) ≈ suc 𝑀)))
208 simplr 781 . . . . . . . . . . . . . . . . . . . . 21 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚))
20913, 208sylbi 220 . . . . . . . . . . . . . . . . . . . 20 (𝜑 → ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚))
210209adantr 486 . . . . . . . . . . . . . . . . . . 19 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚))
211207, 210, 140rspcdva 3578 . . . . . . . . . . . . . . . . . 18 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (ω ⊆ suc 𝑀 → (suc 𝑀 × suc 𝑀) ≈ suc 𝑀))
212201, 211sylbird 263 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (¬ suc 𝑀 ∈ ω → (suc 𝑀 × suc 𝑀) ≈ suc 𝑀))
213 ensdomtr 9132 . . . . . . . . . . . . . . . . . 18 (((suc 𝑀 × suc 𝑀) ≈ suc 𝑀 ∧ suc 𝑀 ≺ 𝑎) → (suc 𝑀 × suc 𝑀) ≺ 𝑎)
214213expcom 419 . . . . . . . . . . . . . . . . 17 (suc 𝑀 ≺ 𝑎 → ((suc 𝑀 × suc 𝑀) ≈ suc 𝑀 → (suc 𝑀 × suc 𝑀) ≺ 𝑎))
215198, 212, 214sylsyld 62 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (¬ suc 𝑀 ∈ ω → (suc 𝑀 × suc 𝑀) ≺ 𝑎))
216195, 215pm2.61d 181 . . . . . . . . . . . . . . 15 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (suc 𝑀 × suc 𝑀) ≺ 𝑎)
217 domsdomtr 9131 . . . . . . . . . . . . . . 15 (((◡𝑄 “ {𝑤}) ≼ (suc 𝑀 × suc 𝑀) ∧ (suc 𝑀 × suc 𝑀) ≺ 𝑎) → (◡𝑄 “ {𝑤}) ≺ 𝑎)
218182, 216, 217syl2anc 596 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝑄 “ {𝑤}) ≺ 𝑎)
219 ensdomtr 9132 . . . . . . . . . . . . . 14 (((◡𝐽‘𝑤) ≈ (◡𝑄 “ {𝑤}) ∧ (◡𝑄 “ {𝑤}) ≺ 𝑎) → (◡𝐽‘𝑤) ≺ 𝑎)
22088, 218, 219syl2anc 596 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝐽‘𝑤) ≺ 𝑎)
221 ordelon 6386 . . . . . . . . . . . . . . 15 ((Ord dom 𝐽 ∧ (◡𝐽‘𝑤) ∈ dom 𝐽) → (◡𝐽‘𝑤) ∈ On)
22276, 79, 221sylancr 599 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝐽‘𝑤) ∈ On)
223 onenon 10030 . . . . . . . . . . . . . . 15 (𝑎 ∈ On → 𝑎 ∈ dom card)
224110, 223syl 18 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → 𝑎 ∈ dom card)
225 cardsdomel 10055 . . . . . . . . . . . . . 14 (((◡𝐽‘𝑤) ∈ On ∧ 𝑎 ∈ dom card) → ((◡𝐽‘𝑤) ≺ 𝑎 ↔ (◡𝐽‘𝑤) ∈ (card‘𝑎)))
226222, 224, 225syl2anc 596 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → ((◡𝐽‘𝑤) ≺ 𝑎 ↔ (◡𝐽‘𝑤) ∈ (card‘𝑎)))
227220, 226mpbid 235 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝐽‘𝑤) ∈ (card‘𝑎))
228 eleq2 2850 . . . . . . . . . . . . . 14 ((card‘𝑎) = 𝑎 → ((◡𝐽‘𝑤) ∈ (card‘𝑎) ↔ (◡𝐽‘𝑤) ∈ 𝑎))
229128, 228sylbir 238 . . . . . . . . . . . . 13 ((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎) → ((◡𝐽‘𝑤) ∈ (card‘𝑎) ↔ (◡𝐽‘𝑤) ∈ 𝑎))
23017, 197, 229syl2an2r 698 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → ((◡𝐽‘𝑤) ∈ (card‘𝑎) ↔ (◡𝐽‘𝑤) ∈ 𝑎))
231227, 230mpbid 235 . . . . . . . . . . 11 ((𝜑 ∧ 𝑤 ∈ (𝑎 × 𝑎)) → (◡𝐽‘𝑤) ∈ 𝑎)
232231ralrimiva 3155 . . . . . . . . . 10 (𝜑 → ∀𝑤 ∈ (𝑎 × 𝑎)(◡𝐽‘𝑤) ∈ 𝑎)
233 fnfvrnss 7121 . . . . . . . . . . 11 ((◡𝐽 Fn (𝑎 × 𝑎) ∧ ∀𝑤 ∈ (𝑎 × 𝑎)(◡𝐽‘𝑤) ∈ 𝑎) → ran ◡𝐽 ⊆ 𝑎)
234 ssdomg 9027 . . . . . . . . . . 11 (𝑎 ∈ V → (ran ◡𝐽 ⊆ 𝑎 → ran ◡𝐽 ≼ 𝑎))
23514, 233, 234mpsyl 69 . . . . . . . . . 10 ((◡𝐽 Fn (𝑎 × 𝑎) ∧ ∀𝑤 ∈ (𝑎 × 𝑎)(◡𝐽‘𝑤) ∈ 𝑎) → ran ◡𝐽 ≼ 𝑎)
23645, 232, 235syl2anc 596 . . . . . . . . 9 (𝜑 → ran ◡𝐽 ≼ 𝑎)
237 endomtr 9039 . . . . . . . . 9 (((𝑎 × 𝑎) ≈ ran ◡𝐽 ∧ ran ◡𝐽 ≼ 𝑎) → (𝑎 × 𝑎) ≼ 𝑎)
23843, 236, 237syl2anc 596 . . . . . . . 8 (𝜑 → (𝑎 × 𝑎) ≼ 𝑎)
23913, 238sylbir 238 . . . . . . 7 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → (𝑎 × 𝑎) ≼ 𝑎)
240 df1o2 8483 . . . . . . . . . . . 12 1o = {∅}
241 1onn 8649 . . . . . . . . . . . 12 1o ∈ ω
242240, 241eqeltrri 2858 . . . . . . . . . . 11 {∅} ∈ ω
243 nnsdom 9655 . . . . . . . . . . 11 ({∅} ∈ ω → {∅} ≺ ω)
244 sdomdom 9007 . . . . . . . . . . 11 ({∅} ≺ ω → {∅} ≼ ω)
245242, 243, 244mp2b 10 . . . . . . . . . 10 {∅} ≼ ω
246 domtr 9034 . . . . . . . . . 10 (({∅} ≼ ω ∧ ω ≼ 𝑎) → {∅} ≼ 𝑎)
247245, 191, 246sylancr 599 . . . . . . . . 9 (ω ⊆ 𝑎 → {∅} ≼ 𝑎)
248 0ex 5261 . . . . . . . . . . . 12 ∅ ∈ V
24914, 248xpsnen 9080 . . . . . . . . . . 11 (𝑎 × {∅}) ≈ 𝑎
250249ensymi 9031 . . . . . . . . . 10 𝑎 ≈ (𝑎 × {∅})
25114xpdom2 9091 . . . . . . . . . 10 ({∅} ≼ 𝑎 → (𝑎 × {∅}) ≼ (𝑎 × 𝑎))
252 endomtr 9039 . . . . . . . . . 10 ((𝑎 ≈ (𝑎 × {∅}) ∧ (𝑎 × {∅}) ≼ (𝑎 × 𝑎)) → 𝑎 ≼ (𝑎 × 𝑎))
253250, 251, 252sylancr 599 . . . . . . . . 9 ({∅} ≼ 𝑎 → 𝑎 ≼ (𝑎 × 𝑎))
254247, 253syl 18 . . . . . . . 8 (ω ⊆ 𝑎 → 𝑎 ≼ (𝑎 × 𝑎))
255254ad2antrl 741 . . . . . . 7 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → 𝑎 ≼ (𝑎 × 𝑎))
256 sbth 9116 . . . . . . 7 (((𝑎 × 𝑎) ≼ 𝑎 ∧ 𝑎 ≼ (𝑎 × 𝑎)) → (𝑎 × 𝑎) ≈ 𝑎)
257239, 255, 256syl2anc 596 . . . . . 6 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → (𝑎 × 𝑎) ≈ 𝑎)
258257expr 462 . . . . 5 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ ω ⊆ 𝑎) → (∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎 → (𝑎 × 𝑎) ≈ 𝑎))
259 simplr 781 . . . . . . . 8 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ¬ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚))
260 simpll 779 . . . . . . . . 9 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ¬ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → 𝑎 ∈ On)
261 simprr 785 . . . . . . . . 9 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ¬ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → ¬ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)
262 rexnal 3115 . . . . . . . . . 10 (∃𝑚 ∈ 𝑎 ¬ 𝑚 ≺ 𝑎 ↔ ¬ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)
263 onelss 6405 . . . . . . . . . . . . 13 (𝑎 ∈ On → (𝑚 ∈ 𝑎 → 𝑚 ⊆ 𝑎))
264 ssdomg 9027 . . . . . . . . . . . . 13 (𝑎 ∈ On → (𝑚 ⊆ 𝑎 → 𝑚 ≼ 𝑎))
265263, 264syld 48 . . . . . . . . . . . 12 (𝑎 ∈ On → (𝑚 ∈ 𝑎 → 𝑚 ≼ 𝑎))
266 bren2 9010 . . . . . . . . . . . . 13 (𝑚 ≈ 𝑎 ↔ (𝑚 ≼ 𝑎 ∧ ¬ 𝑚 ≺ 𝑎))
267266simplbi2 506 . . . . . . . . . . . 12 (𝑚 ≼ 𝑎 → (¬ 𝑚 ≺ 𝑎 → 𝑚 ≈ 𝑎))
268265, 267syl6 36 . . . . . . . . . . 11 (𝑎 ∈ On → (𝑚 ∈ 𝑎 → (¬ 𝑚 ≺ 𝑎 → 𝑚 ≈ 𝑎)))
269268reximdvai 3174 . . . . . . . . . 10 (𝑎 ∈ On → (∃𝑚 ∈ 𝑎 ¬ 𝑚 ≺ 𝑎 → ∃𝑚 ∈ 𝑎 𝑚 ≈ 𝑎))
270262, 269biimtrrid 246 . . . . . . . . 9 (𝑎 ∈ On → (¬ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎 → ∃𝑚 ∈ 𝑎 𝑚 ≈ 𝑎))
271260, 261, 270sylc 66 . . . . . . . 8 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ¬ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → ∃𝑚 ∈ 𝑎 𝑚 ≈ 𝑎)
272 r19.29 3126 . . . . . . . 8 ((∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) ∧ ∃𝑚 ∈ 𝑎 𝑚 ≈ 𝑎) → ∃𝑚 ∈ 𝑎 ((ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) ∧ 𝑚 ≈ 𝑎))
273259, 271, 272syl2anc 596 . . . . . . 7 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ¬ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → ∃𝑚 ∈ 𝑎 ((ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) ∧ 𝑚 ≈ 𝑎))
274 simprl 783 . . . . . . . 8 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ¬ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → ω ⊆ 𝑎)
275 onelon 6387 . . . . . . . . . . . . . . . . 17 ((𝑎 ∈ On ∧ 𝑚 ∈ 𝑎) → 𝑚 ∈ On)
276 ensym 9030 . . . . . . . . . . . . . . . . . 18 (𝑚 ≈ 𝑎 → 𝑎 ≈ 𝑚)
277 domentr 9040 . . . . . . . . . . . . . . . . . 18 ((ω ≼ 𝑎 ∧ 𝑎 ≈ 𝑚) → ω ≼ 𝑚)
278191, 276, 277syl2an 608 . . . . . . . . . . . . . . . . 17 ((ω ⊆ 𝑎 ∧ 𝑚 ≈ 𝑎) → ω ≼ 𝑚)
279 domnsym 9122 . . . . . . . . . . . . . . . . . . 19 (ω ≼ 𝑚 → ¬ 𝑚 ≺ ω)
280 nnsdom 9655 . . . . . . . . . . . . . . . . . . 19 (𝑚 ∈ ω → 𝑚 ≺ ω)
281279, 280nsyl 141 . . . . . . . . . . . . . . . . . 18 (ω ≼ 𝑚 → ¬ 𝑚 ∈ ω)
282 ontri1 6397 . . . . . . . . . . . . . . . . . . 19 ((ω ∈ On ∧ 𝑚 ∈ On) → (ω ⊆ 𝑚 ↔ ¬ 𝑚 ∈ ω))
283199, 282mpan 703 . . . . . . . . . . . . . . . . . 18 (𝑚 ∈ On → (ω ⊆ 𝑚 ↔ ¬ 𝑚 ∈ ω))
284281, 283imbitrrid 249 . . . . . . . . . . . . . . . . 17 (𝑚 ∈ On → (ω ≼ 𝑚 → ω ⊆ 𝑚))
285275, 278, 284syl2im 41 . . . . . . . . . . . . . . . 16 ((𝑎 ∈ On ∧ 𝑚 ∈ 𝑎) → ((ω ⊆ 𝑎 ∧ 𝑚 ≈ 𝑎) → ω ⊆ 𝑚))
286285expd 421 . . . . . . . . . . . . . . 15 ((𝑎 ∈ On ∧ 𝑚 ∈ 𝑎) → (ω ⊆ 𝑎 → (𝑚 ≈ 𝑎 → ω ⊆ 𝑚)))
287286impcom 413 . . . . . . . . . . . . . 14 ((ω ⊆ 𝑎 ∧ (𝑎 ∈ On ∧ 𝑚 ∈ 𝑎)) → (𝑚 ≈ 𝑎 → ω ⊆ 𝑚))
288287imim1d 83 . . . . . . . . . . . . 13 ((ω ⊆ 𝑎 ∧ (𝑎 ∈ On ∧ 𝑚 ∈ 𝑎)) → ((ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) → (𝑚 ≈ 𝑎 → (𝑚 × 𝑚) ≈ 𝑚)))
289288imp32 424 . . . . . . . . . . . 12 (((ω ⊆ 𝑎 ∧ (𝑎 ∈ On ∧ 𝑚 ∈ 𝑎)) ∧ ((ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) ∧ 𝑚 ≈ 𝑎)) → (𝑚 × 𝑚) ≈ 𝑚)
290 entr 9033 . . . . . . . . . . . . . . . 16 (((𝑚 × 𝑚) ≈ 𝑚 ∧ 𝑚 ≈ 𝑎) → (𝑚 × 𝑚) ≈ 𝑎)
291290ancoms 464 . . . . . . . . . . . . . . 15 ((𝑚 ≈ 𝑎 ∧ (𝑚 × 𝑚) ≈ 𝑚) → (𝑚 × 𝑚) ≈ 𝑎)
292 xpen 9159 . . . . . . . . . . . . . . . . 17 ((𝑎 ≈ 𝑚 ∧ 𝑎 ≈ 𝑚) → (𝑎 × 𝑎) ≈ (𝑚 × 𝑚))
293292anidms 577 . . . . . . . . . . . . . . . 16 (𝑎 ≈ 𝑚 → (𝑎 × 𝑎) ≈ (𝑚 × 𝑚))
294 entr 9033 . . . . . . . . . . . . . . . 16 (((𝑎 × 𝑎) ≈ (𝑚 × 𝑚) ∧ (𝑚 × 𝑚) ≈ 𝑎) → (𝑎 × 𝑎) ≈ 𝑎)
295293, 294sylan 592 . . . . . . . . . . . . . . 15 ((𝑎 ≈ 𝑚 ∧ (𝑚 × 𝑚) ≈ 𝑎) → (𝑎 × 𝑎) ≈ 𝑎)
296276, 291, 295syl2an2r 698 . . . . . . . . . . . . . 14 ((𝑚 ≈ 𝑎 ∧ (𝑚 × 𝑚) ≈ 𝑚) → (𝑎 × 𝑎) ≈ 𝑎)
297296ex 418 . . . . . . . . . . . . 13 (𝑚 ≈ 𝑎 → ((𝑚 × 𝑚) ≈ 𝑚 → (𝑎 × 𝑎) ≈ 𝑎))
298297ad2antll 742 . . . . . . . . . . . 12 (((ω ⊆ 𝑎 ∧ (𝑎 ∈ On ∧ 𝑚 ∈ 𝑎)) ∧ ((ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) ∧ 𝑚 ≈ 𝑎)) → ((𝑚 × 𝑚) ≈ 𝑚 → (𝑎 × 𝑎) ≈ 𝑎))
299289, 298mpd 16 . . . . . . . . . . 11 (((ω ⊆ 𝑎 ∧ (𝑎 ∈ On ∧ 𝑚 ∈ 𝑎)) ∧ ((ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) ∧ 𝑚 ≈ 𝑎)) → (𝑎 × 𝑎) ≈ 𝑎)
300299ex 418 . . . . . . . . . 10 ((ω ⊆ 𝑎 ∧ (𝑎 ∈ On ∧ 𝑚 ∈ 𝑎)) → (((ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) ∧ 𝑚 ≈ 𝑎) → (𝑎 × 𝑎) ≈ 𝑎))
301300expr 462 . . . . . . . . 9 ((ω ⊆ 𝑎 ∧ 𝑎 ∈ On) → (𝑚 ∈ 𝑎 → (((ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) ∧ 𝑚 ≈ 𝑎) → (𝑎 × 𝑎) ≈ 𝑎)))
302301rexlimdv 3162 . . . . . . . 8 ((ω ⊆ 𝑎 ∧ 𝑎 ∈ On) → (∃𝑚 ∈ 𝑎 ((ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) ∧ 𝑚 ≈ 𝑎) → (𝑎 × 𝑎) ≈ 𝑎))
303274, 260, 302syl2anc 596 . . . . . . 7 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ¬ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → (∃𝑚 ∈ 𝑎 ((ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) ∧ 𝑚 ≈ 𝑎) → (𝑎 × 𝑎) ≈ 𝑎))
304273, 303mpd 16 . . . . . 6 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ (ω ⊆ 𝑎 ∧ ¬ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎)) → (𝑎 × 𝑎) ≈ 𝑎)
305304expr 462 . . . . 5 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ ω ⊆ 𝑎) → (¬ ∀𝑚 ∈ 𝑎 𝑚 ≺ 𝑎 → (𝑎 × 𝑎) ≈ 𝑎))
306258, 305pm2.61d 181 . . . 4 (((𝑎 ∈ On ∧ ∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚)) ∧ ω ⊆ 𝑎) → (𝑎 × 𝑎) ≈ 𝑎)
307306exp31 425 . . 3 (𝑎 ∈ On → (∀𝑚 ∈ 𝑎 (ω ⊆ 𝑚 → (𝑚 × 𝑚) ≈ 𝑚) → (ω ⊆ 𝑎 → (𝑎 × 𝑎) ≈ 𝑎)))
3086, 12, 307tfis3 7869 . 2 (𝐴 ∈ On → (ω ⊆ 𝐴 → (𝐴 × 𝐴) ≈ 𝐴))
309308imp 412 1 ((𝐴 ∈ On ∧ ω ⊆ 𝐴) → (𝐴 × 𝐴) ≈ 𝐴)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145  ∀wral 3077  ∃wrex 3087  Vcvv 3451   ∪ cun 3897   ∩ cin 3898   ⊆ wss 3899  ∅c0 4279  {csn 4584  ⟨cop 4590   class class class wbr 5103  {copab 5167   E cep 5550   Se wse 5602   We wwe 5603   × cxp 5649  ◡ccnv 5650  dom cdm 5651  ran crn 5652   ↾ cres 5653   “ cima 5654  Ord word 6361  Oncon0 6362  Lim wlim 6363  suc csuc 6364   Fn wfn 6533  ⟶wf 6534  –1-1→wf1 6535  –1-1-onto→wf1o 6537  ‘cfv 6538   Isom wiso 6539  ωcom 7877  1st c1st 7999  2nd c2nd 8000  1oc1o 8469   ≈ cen 8970   ≼ cdom 8971   ≺ csdm 8972  Fincfn 8973  OrdIsocoi 9503  cardccrd 10016
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7751  ax-inf2 9642
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-ral 3078  df-rex 3088  df-rmo 3366  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-se 5605  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  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-isom 6547  df-riota 7377  df-ov 7423  df-om 7878  df-1st 8001  df-2nd 8002  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-rdg 8418  df-1o 8476  df-er 8717  df-en 8974  df-dom 8975  df-sdom 8976  df-fin 8977  df-oi 9504  df-card 10020
This theorem is used by:  infxpen  10093
  Copyright terms: Public domain W3C validator