Theorem omcl3g 43953

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 4659	. . . . 5 ⊢ (𝐶 ∈ {∅, 1o, 2o} → (𝐶 = ∅ ∨ 𝐶 = 1o ∨ 𝐶 = 2o))
2		df-3o 8455	. . . . . 6 ⊢ 3o = suc 2o
3		df2o3 8461	. . . . . . . 8 ⊢ 2o = {∅, 1o}
4	3	uneq1i 4126	. . . . . . 7 ⊢ (2o ∪ {2o}) = ({∅, 1o} ∪ {2o})
5		df-suc 6367	. . . . . . 7 ⊢ suc 2o = (2o ∪ {2o})
6		df-tp 4599	. . . . . . 7 ⊢ {∅, 1o, 2o} = ({∅, 1o} ∪ {2o})
7	4, 5, 6	3eqtr4i 2802	. . . . . 6 ⊢ suc 2o = {∅, 1o, 2o}
8	2, 7	eqtri 2792	. . . . 5 ⊢ 3o = {∅, 1o, 2o}
9	1, 8	eleq2s 2887	. . . 4 ⊢ (𝐶 ∈ 3o → (𝐶 = ∅ ∨ 𝐶 = 1o ∨ 𝐶 = 2o))
10		orc 880	. . . . . . 7 ⊢ (𝐶 = ∅ → (𝐶 = ∅ ∨ (𝐶 = (ω ↑o (ω ↑o 𝐶)) ∧ 𝐶 ∈ On)))
11		omcl2 43952	. . . . . . 7 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 = ∅ ∨ (𝐶 = (ω ↑o (ω ↑o 𝐶)) ∧ 𝐶 ∈ On))) → (𝐴 ·o 𝐵) ∈ 𝐶)
12	10, 11	sylan2 604	. . . . . 6 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ 𝐶 = ∅) → (𝐴 ·o 𝐵) ∈ 𝐶)
13	12	ex 417	. . . . 5 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐶 = ∅ → (𝐴 ·o 𝐵) ∈ 𝐶))
14		el1o 8480	. . . . . . . . 9 ⊢ (𝐴 ∈ 1o ↔ 𝐴 = ∅)
15		el1o 8480	. . . . . . . . 9 ⊢ (𝐵 ∈ 1o ↔ 𝐵 = ∅)
16		oveq12 7420	. . . . . . . . . 10 ⊢ ((𝐴 = ∅ ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) = (∅ ·o ∅))
17		0elon 6417	. . . . . . . . . . . 12 ⊢ ∅ ∈ On
18		om0 8502	. . . . . . . . . . . 12 ⊢ (∅ ∈ On → (∅ ·o ∅) = ∅)
19	17, 18	ax-mp 5	. . . . . . . . . . 11 ⊢ (∅ ·o ∅) = ∅
20		0lt1o 8489	. . . . . . . . . . 11 ⊢ ∅ ∈ 1o
21	19, 20	eqeltri 2865	. . . . . . . . . 10 ⊢ (∅ ·o ∅) ∈ 1o
22	16, 21	eqeltrdi 2877	. . . . . . . . 9 ⊢ ((𝐴 = ∅ ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) ∈ 1o)
23	14, 15, 22	syl2anb 609	. . . . . . . 8 ⊢ ((𝐴 ∈ 1o ∧ 𝐵 ∈ 1o) → (𝐴 ·o 𝐵) ∈ 1o)
24	23	a1i 11	. . . . . . 7 ⊢ (𝐶 = 1o → ((𝐴 ∈ 1o ∧ 𝐵 ∈ 1o) → (𝐴 ·o 𝐵) ∈ 1o))
25		eleq2 2858	. . . . . . . 8 ⊢ (𝐶 = 1o → (𝐴 ∈ 𝐶 ↔ 𝐴 ∈ 1o))
26		eleq2 2858	. . . . . . . 8 ⊢ (𝐶 = 1o → (𝐵 ∈ 𝐶 ↔ 𝐵 ∈ 1o))
27	25, 26	anbi12d 643	. . . . . . 7 ⊢ (𝐶 = 1o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ↔ (𝐴 ∈ 1o ∧ 𝐵 ∈ 1o)))
28		eleq2 2858	. . . . . . 7 ⊢ (𝐶 = 1o → ((𝐴 ·o 𝐵) ∈ 𝐶 ↔ (𝐴 ·o 𝐵) ∈ 1o))
29	24, 27, 28	3imtr4d 297	. . . . . 6 ⊢ (𝐶 = 1o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐴 ·o 𝐵) ∈ 𝐶))
30	29	com12 33	. . . . 5 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐶 = 1o → (𝐴 ·o 𝐵) ∈ 𝐶))
31		elpri 4618	. . . . . . . . . 10 ⊢ (𝐴 ∈ {∅, 1o} → (𝐴 = ∅ ∨ 𝐴 = 1o))
32	31, 3	eleq2s 2887	. . . . . . . . 9 ⊢ (𝐴 ∈ 2o → (𝐴 = ∅ ∨ 𝐴 = 1o))
33		elpri 4618	. . . . . . . . . 10 ⊢ (𝐵 ∈ {∅, 1o} → (𝐵 = ∅ ∨ 𝐵 = 1o))
34	33, 3	eleq2s 2887	. . . . . . . . 9 ⊢ (𝐵 ∈ 2o → (𝐵 = ∅ ∨ 𝐵 = 1o))
35		0ex 5272	. . . . . . . . . . . . 13 ⊢ ∅ ∈ V
36	35	prid1 4733	. . . . . . . . . . . 12 ⊢ ∅ ∈ {∅, 1o}
37	36, 19, 3	3eltr4i 2882	. . . . . . . . . . 11 ⊢ (∅ ·o ∅) ∈ 2o
38	16, 37	eqeltrdi 2877	. . . . . . . . . 10 ⊢ ((𝐴 = ∅ ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) ∈ 2o)
39		oveq12 7420	. . . . . . . . . . 11 ⊢ ((𝐴 = 1o ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) = (1o ·o ∅))
40		1on 8466	. . . . . . . . . . . . 13 ⊢ 1o ∈ On
41		om0 8502	. . . . . . . . . . . . 13 ⊢ (1o ∈ On → (1o ·o ∅) = ∅)
42	40, 41	ax-mp 5	. . . . . . . . . . . 12 ⊢ (1o ·o ∅) = ∅
43	36, 42, 3	3eltr4i 2882	. . . . . . . . . . 11 ⊢ (1o ·o ∅) ∈ 2o
44	39, 43	eqeltrdi 2877	. . . . . . . . . 10 ⊢ ((𝐴 = 1o ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) ∈ 2o)
45		oveq12 7420	. . . . . . . . . . 11 ⊢ ((𝐴 = ∅ ∧ 𝐵 = 1o) → (𝐴 ·o 𝐵) = (∅ ·o 1o))
46		om0r 8524	. . . . . . . . . . . . 13 ⊢ (1o ∈ On → (∅ ·o 1o) = ∅)
47	40, 46	ax-mp 5	. . . . . . . . . . . 12 ⊢ (∅ ·o 1o) = ∅
48	36, 47, 3	3eltr4i 2882	. . . . . . . . . . 11 ⊢ (∅ ·o 1o) ∈ 2o
49	45, 48	eqeltrdi 2877	. . . . . . . . . 10 ⊢ ((𝐴 = ∅ ∧ 𝐵 = 1o) → (𝐴 ·o 𝐵) ∈ 2o)
50		oveq12 7420	. . . . . . . . . . 11 ⊢ ((𝐴 = 1o ∧ 𝐵 = 1o) → (𝐴 ·o 𝐵) = (1o ·o 1o))
51		1oex 8463	. . . . . . . . . . . . 13 ⊢ 1o ∈ V
52	51	prid2 4734	. . . . . . . . . . . 12 ⊢ 1o ∈ {∅, 1o}
53		om1 8527	. . . . . . . . . . . . 13 ⊢ (1o ∈ On → (1o ·o 1o) = 1o)
54	40, 53	ax-mp 5	. . . . . . . . . . . 12 ⊢ (1o ·o 1o) = 1o
55	52, 54, 3	3eltr4i 2882	. . . . . . . . . . 11 ⊢ (1o ·o 1o) ∈ 2o
56	50, 55	eqeltrdi 2877	. . . . . . . . . 10 ⊢ ((𝐴 = 1o ∧ 𝐵 = 1o) → (𝐴 ·o 𝐵) ∈ 2o)
57	38, 44, 49, 56	ccase 1051	. . . . . . . . 9 ⊢ (((𝐴 = ∅ ∨ 𝐴 = 1o) ∧ (𝐵 = ∅ ∨ 𝐵 = 1o)) → (𝐴 ·o 𝐵) ∈ 2o)
58	32, 34, 57	syl2an 607	. . . . . . . 8 ⊢ ((𝐴 ∈ 2o ∧ 𝐵 ∈ 2o) → (𝐴 ·o 𝐵) ∈ 2o)
59	58	a1i 11	. . . . . . 7 ⊢ (𝐶 = 2o → ((𝐴 ∈ 2o ∧ 𝐵 ∈ 2o) → (𝐴 ·o 𝐵) ∈ 2o))
60		eleq2 2858	. . . . . . . 8 ⊢ (𝐶 = 2o → (𝐴 ∈ 𝐶 ↔ 𝐴 ∈ 2o))
61		eleq2 2858	. . . . . . . 8 ⊢ (𝐶 = 2o → (𝐵 ∈ 𝐶 ↔ 𝐵 ∈ 2o))
62	60, 61	anbi12d 643	. . . . . . 7 ⊢ (𝐶 = 2o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ↔ (𝐴 ∈ 2o ∧ 𝐵 ∈ 2o)))
63		eleq2 2858	. . . . . . 7 ⊢ (𝐶 = 2o → ((𝐴 ·o 𝐵) ∈ 𝐶 ↔ (𝐴 ·o 𝐵) ∈ 2o))
64	59, 62, 63	3imtr4d 297	. . . . . 6 ⊢ (𝐶 = 2o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐴 ·o 𝐵) ∈ 𝐶))
65	64	com12 33	. . . . 5 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐶 = 2o → (𝐴 ·o 𝐵) ∈ 𝐶))
66	13, 30, 65	3jaod 1454	. . . 4 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → ((𝐶 = ∅ ∨ 𝐶 = 1o ∨ 𝐶 = 2o) → (𝐴 ·o 𝐵) ∈ 𝐶))
67	9, 66	syl5 35	. . 3 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐶 ∈ 3o → (𝐴 ·o 𝐵) ∈ 𝐶))
68		olc 881	. . . . 5 ⊢ ((𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On) → (𝐶 = ∅ ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On)))
69		omcl2 43952	. . . . 5 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 = ∅ ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On))) → (𝐴 ·o 𝐵) ∈ 𝐶)
70	68, 69	sylan2 604	. . . 4 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On)) → (𝐴 ·o 𝐵) ∈ 𝐶)
71	70	ex 417	. . 3 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → ((𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On) → (𝐴 ·o 𝐵) ∈ 𝐶))
72	67, 71	jaod 872	. 2 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → ((𝐶 ∈ 3o ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On)) → (𝐴 ·o 𝐵) ∈ 𝐶))
73	72	imp 411	1 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 ∈ 3o ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On))) → (𝐴 ·o 𝐵) ∈ 𝐶)

Syntax hints:   → wi 4   ∧ wa 400   ∨ wo 860   ∨ w3o 1100   = wceq 1567   ∈ wcel 2149   ∪ cun 3911  ∅c0 4294  {csn 4594  {cpr 4596  {ctp 4598  Oncon0 6361  suc csuc 6363  (class class class)co 7411  ωcom 7862  1_oc1o 8446  2_oc2o 8447  3_oc3o 8448   ·_o comu 8451   ↑_o coe 8452

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pr 5405  ax-un 7733  ax-inf2 9610

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-tp 4599  df-op 4601  df-ot 4603  df-uni 4877  df-int 4917  df-iun 4962  df-br 5114  df-opab 5178  df-mpt 5197  df-tr 5223  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-ov 7414  df-oprab 7415  df-mpo 7416  df-om 7863  df-1st 7986  df-2nd 7987  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397  df-1o 8453  df-2o 8454  df-3o 8455  df-oadd 8457  df-omul 8458  df-oexp 8459

This theorem is referenced by: (None)