Theorem omcl3g 42763

Description: Closure law for ordinal multiplication. (Contributed by RP, 14-Jan-2025.)

Assertion

Ref	Expression
omcl3g	⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 ∈ 3o ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On))) → (𝐴 ·o 𝐵) ∈ 𝐶)

Proof of Theorem omcl3g

Step	Hyp	Ref	Expression
1		eltpi 4692	. . . . 5 ⊢ (𝐶 ∈ {∅, 1o, 2o} → (𝐶 = ∅ ∨ 𝐶 = 1o ∨ 𝐶 = 2o))
2		df-3o 8489	. . . . . 6 ⊢ 3o = suc 2o
3		df2o3 8495	. . . . . . . 8 ⊢ 2o = {∅, 1o}
4	3	uneq1i 4158	. . . . . . 7 ⊢ (2o ∪ {2o}) = ({∅, 1o} ∪ {2o})
5		df-suc 6375	. . . . . . 7 ⊢ suc 2o = (2o ∪ {2o})
6		df-tp 4634	. . . . . . 7 ⊢ {∅, 1o, 2o} = ({∅, 1o} ∪ {2o})
7	4, 5, 6	3eqtr4i 2766	. . . . . 6 ⊢ suc 2o = {∅, 1o, 2o}
8	2, 7	eqtri 2756	. . . . 5 ⊢ 3o = {∅, 1o, 2o}
9	1, 8	eleq2s 2847	. . . 4 ⊢ (𝐶 ∈ 3o → (𝐶 = ∅ ∨ 𝐶 = 1o ∨ 𝐶 = 2o))
10		orc 866	. . . . . . 7 ⊢ (𝐶 = ∅ → (𝐶 = ∅ ∨ (𝐶 = (ω ↑o (ω ↑o 𝐶)) ∧ 𝐶 ∈ On)))
11		omcl2 42762	. . . . . . 7 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 = ∅ ∨ (𝐶 = (ω ↑o (ω ↑o 𝐶)) ∧ 𝐶 ∈ On))) → (𝐴 ·o 𝐵) ∈ 𝐶)
12	10, 11	sylan2 592	. . . . . 6 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ 𝐶 = ∅) → (𝐴 ·o 𝐵) ∈ 𝐶)
13	12	ex 412	. . . . 5 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐶 = ∅ → (𝐴 ·o 𝐵) ∈ 𝐶))
14		el1o 8516	. . . . . . . . 9 ⊢ (𝐴 ∈ 1o ↔ 𝐴 = ∅)
15		el1o 8516	. . . . . . . . 9 ⊢ (𝐵 ∈ 1o ↔ 𝐵 = ∅)
16		oveq12 7429	. . . . . . . . . 10 ⊢ ((𝐴 = ∅ ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) = (∅ ·o ∅))
17		0elon 6423	. . . . . . . . . . . 12 ⊢ ∅ ∈ On
18		om0 8538	. . . . . . . . . . . 12 ⊢ (∅ ∈ On → (∅ ·o ∅) = ∅)
19	17, 18	ax-mp 5	. . . . . . . . . . 11 ⊢ (∅ ·o ∅) = ∅
20		0lt1o 8525	. . . . . . . . . . 11 ⊢ ∅ ∈ 1o
21	19, 20	eqeltri 2825	. . . . . . . . . 10 ⊢ (∅ ·o ∅) ∈ 1o
22	16, 21	eqeltrdi 2837	. . . . . . . . 9 ⊢ ((𝐴 = ∅ ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) ∈ 1o)
23	14, 15, 22	syl2anb 597	. . . . . . . 8 ⊢ ((𝐴 ∈ 1o ∧ 𝐵 ∈ 1o) → (𝐴 ·o 𝐵) ∈ 1o)
24	23	a1i 11	. . . . . . 7 ⊢ (𝐶 = 1o → ((𝐴 ∈ 1o ∧ 𝐵 ∈ 1o) → (𝐴 ·o 𝐵) ∈ 1o))
25		eleq2 2818	. . . . . . . 8 ⊢ (𝐶 = 1o → (𝐴 ∈ 𝐶 ↔ 𝐴 ∈ 1o))
26		eleq2 2818	. . . . . . . 8 ⊢ (𝐶 = 1o → (𝐵 ∈ 𝐶 ↔ 𝐵 ∈ 1o))
27	25, 26	anbi12d 631	. . . . . . 7 ⊢ (𝐶 = 1o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ↔ (𝐴 ∈ 1o ∧ 𝐵 ∈ 1o)))
28		eleq2 2818	. . . . . . 7 ⊢ (𝐶 = 1o → ((𝐴 ·o 𝐵) ∈ 𝐶 ↔ (𝐴 ·o 𝐵) ∈ 1o))
29	24, 27, 28	3imtr4d 294	. . . . . 6 ⊢ (𝐶 = 1o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐴 ·o 𝐵) ∈ 𝐶))
30	29	com12 32	. . . . 5 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐶 = 1o → (𝐴 ·o 𝐵) ∈ 𝐶))
31		elpri 4651	. . . . . . . . . 10 ⊢ (𝐴 ∈ {∅, 1o} → (𝐴 = ∅ ∨ 𝐴 = 1o))
32	31, 3	eleq2s 2847	. . . . . . . . 9 ⊢ (𝐴 ∈ 2o → (𝐴 = ∅ ∨ 𝐴 = 1o))
33		elpri 4651	. . . . . . . . . 10 ⊢ (𝐵 ∈ {∅, 1o} → (𝐵 = ∅ ∨ 𝐵 = 1o))
34	33, 3	eleq2s 2847	. . . . . . . . 9 ⊢ (𝐵 ∈ 2o → (𝐵 = ∅ ∨ 𝐵 = 1o))
35		0ex 5307	. . . . . . . . . . . . 13 ⊢ ∅ ∈ V
36	35	prid1 4767	. . . . . . . . . . . 12 ⊢ ∅ ∈ {∅, 1o}
37	36, 19, 3	3eltr4i 2842	. . . . . . . . . . 11 ⊢ (∅ ·o ∅) ∈ 2o
38	16, 37	eqeltrdi 2837	. . . . . . . . . 10 ⊢ ((𝐴 = ∅ ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) ∈ 2o)
39		oveq12 7429	. . . . . . . . . . 11 ⊢ ((𝐴 = 1o ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) = (1o ·o ∅))
40		1on 8499	. . . . . . . . . . . . 13 ⊢ 1o ∈ On
41		om0 8538	. . . . . . . . . . . . 13 ⊢ (1o ∈ On → (1o ·o ∅) = ∅)
42	40, 41	ax-mp 5	. . . . . . . . . . . 12 ⊢ (1o ·o ∅) = ∅
43	36, 42, 3	3eltr4i 2842	. . . . . . . . . . 11 ⊢ (1o ·o ∅) ∈ 2o
44	39, 43	eqeltrdi 2837	. . . . . . . . . 10 ⊢ ((𝐴 = 1o ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) ∈ 2o)
45		oveq12 7429	. . . . . . . . . . 11 ⊢ ((𝐴 = ∅ ∧ 𝐵 = 1o) → (𝐴 ·o 𝐵) = (∅ ·o 1o))
46		om0r 8560	. . . . . . . . . . . . 13 ⊢ (1o ∈ On → (∅ ·o 1o) = ∅)
47	40, 46	ax-mp 5	. . . . . . . . . . . 12 ⊢ (∅ ·o 1o) = ∅
48	36, 47, 3	3eltr4i 2842	. . . . . . . . . . 11 ⊢ (∅ ·o 1o) ∈ 2o
49	45, 48	eqeltrdi 2837	. . . . . . . . . 10 ⊢ ((𝐴 = ∅ ∧ 𝐵 = 1o) → (𝐴 ·o 𝐵) ∈ 2o)
50		oveq12 7429	. . . . . . . . . . 11 ⊢ ((𝐴 = 1o ∧ 𝐵 = 1o) → (𝐴 ·o 𝐵) = (1o ·o 1o))
51		1oex 8497	. . . . . . . . . . . . 13 ⊢ 1o ∈ V
52	51	prid2 4768	. . . . . . . . . . . 12 ⊢ 1o ∈ {∅, 1o}
53		om1 8563	. . . . . . . . . . . . 13 ⊢ (1o ∈ On → (1o ·o 1o) = 1o)
54	40, 53	ax-mp 5	. . . . . . . . . . . 12 ⊢ (1o ·o 1o) = 1o
55	52, 54, 3	3eltr4i 2842	. . . . . . . . . . 11 ⊢ (1o ·o 1o) ∈ 2o
56	50, 55	eqeltrdi 2837	. . . . . . . . . 10 ⊢ ((𝐴 = 1o ∧ 𝐵 = 1o) → (𝐴 ·o 𝐵) ∈ 2o)
57	38, 44, 49, 56	ccase 1036	. . . . . . . . 9 ⊢ (((𝐴 = ∅ ∨ 𝐴 = 1o) ∧ (𝐵 = ∅ ∨ 𝐵 = 1o)) → (𝐴 ·o 𝐵) ∈ 2o)
58	32, 34, 57	syl2an 595	. . . . . . . 8 ⊢ ((𝐴 ∈ 2o ∧ 𝐵 ∈ 2o) → (𝐴 ·o 𝐵) ∈ 2o)
59	58	a1i 11	. . . . . . 7 ⊢ (𝐶 = 2o → ((𝐴 ∈ 2o ∧ 𝐵 ∈ 2o) → (𝐴 ·o 𝐵) ∈ 2o))
60		eleq2 2818	. . . . . . . 8 ⊢ (𝐶 = 2o → (𝐴 ∈ 𝐶 ↔ 𝐴 ∈ 2o))
61		eleq2 2818	. . . . . . . 8 ⊢ (𝐶 = 2o → (𝐵 ∈ 𝐶 ↔ 𝐵 ∈ 2o))
62	60, 61	anbi12d 631	. . . . . . 7 ⊢ (𝐶 = 2o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ↔ (𝐴 ∈ 2o ∧ 𝐵 ∈ 2o)))
63		eleq2 2818	. . . . . . 7 ⊢ (𝐶 = 2o → ((𝐴 ·o 𝐵) ∈ 𝐶 ↔ (𝐴 ·o 𝐵) ∈ 2o))
64	59, 62, 63	3imtr4d 294	. . . . . 6 ⊢ (𝐶 = 2o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐴 ·o 𝐵) ∈ 𝐶))
65	64	com12 32	. . . . 5 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐶 = 2o → (𝐴 ·o 𝐵) ∈ 𝐶))
66	13, 30, 65	3jaod 1426	. . . 4 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → ((𝐶 = ∅ ∨ 𝐶 = 1o ∨ 𝐶 = 2o) → (𝐴 ·o 𝐵) ∈ 𝐶))
67	9, 66	syl5 34	. . 3 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐶 ∈ 3o → (𝐴 ·o 𝐵) ∈ 𝐶))
68		olc 867	. . . . 5 ⊢ ((𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On) → (𝐶 = ∅ ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On)))
69		omcl2 42762	. . . . 5 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 = ∅ ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On))) → (𝐴 ·o 𝐵) ∈ 𝐶)
70	68, 69	sylan2 592	. . . 4 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On)) → (𝐴 ·o 𝐵) ∈ 𝐶)
71	70	ex 412	. . 3 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → ((𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On) → (𝐴 ·o 𝐵) ∈ 𝐶))
72	67, 71	jaod 858	. 2 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → ((𝐶 ∈ 3o ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On)) → (𝐴 ·o 𝐵) ∈ 𝐶))
73	72	imp 406	1 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 ∈ 3o ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On))) → (𝐴 ·o 𝐵) ∈ 𝐶)

Syntax hints:   → wi 4   ∧ wa 395   ∨ wo 846   ∨ w3o 1084   = wceq 1534   ∈ wcel 2099   ∪ cun 3945  ∅c0 4323  {csn 4629  {cpr 4631  {ctp 4633  Oncon0 6369  suc csuc 6371  (class class class)co 7420  ωcom 7870  1_oc1o 8480  2_oc2o 8481  3_oc3o 8482   ·_o comu 8485   ↑_o coe 8486

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2167  ax-ext 2699  ax-rep 5285  ax-sep 5299  ax-nul 5306  ax-pr 5429  ax-un 7740  ax-reg 9616  ax-inf2 9665

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 847  df-3or 1086  df-3an 1087  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2530  df-eu 2559  df-clab 2706  df-cleq 2720  df-clel 2806  df-nfc 2881  df-ne 2938  df-ral 3059  df-rex 3068  df-rmo 3373  df-reu 3374  df-rab 3430  df-v 3473  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4324  df-if 4530  df-pw 4605  df-sn 4630  df-pr 4632  df-tp 4634  df-op 4636  df-ot 4638  df-uni 4909  df-int 4950  df-iun 4998  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5576  df-eprel 5582  df-po 5590  df-so 5591  df-fr 5633  df-we 5635  df-xp 5684  df-rel 5685  df-cnv 5686  df-co 5687  df-dm 5688  df-rn 5689  df-res 5690  df-ima 5691  df-pred 6305  df-ord 6372  df-on 6373  df-lim 6374  df-suc 6375  df-iota 6500  df-fun 6550  df-fn 6551  df-f 6552  df-f1 6553  df-fo 6554  df-f1o 6555  df-fv 6556  df-ov 7423  df-oprab 7424  df-mpo 7425  df-om 7871  df-1st 7993  df-2nd 7994  df-frecs 8287  df-wrecs 8318  df-recs 8392  df-rdg 8431  df-1o 8487  df-2o 8488  df-3o 8489  df-oadd 8491  df-omul 8492  df-oexp 8493

This theorem is referenced by: (None)