Theorem omcl3g 43695

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 4647	. . . . 5 ⊢ (𝐶 ∈ {∅, 1o, 2o} → (𝐶 = ∅ ∨ 𝐶 = 1o ∨ 𝐶 = 2o))
2		df-3o 8409	. . . . . 6 ⊢ 3o = suc 2o
3		df2o3 8415	. . . . . . . 8 ⊢ 2o = {∅, 1o}
4	3	uneq1i 4118	. . . . . . 7 ⊢ (2o ∪ {2o}) = ({∅, 1o} ∪ {2o})
5		df-suc 6331	. . . . . . 7 ⊢ suc 2o = (2o ∪ {2o})
6		df-tp 4587	. . . . . . 7 ⊢ {∅, 1o, 2o} = ({∅, 1o} ∪ {2o})
7	4, 5, 6	3eqtr4i 2770	. . . . . 6 ⊢ suc 2o = {∅, 1o, 2o}
8	2, 7	eqtri 2760	. . . . 5 ⊢ 3o = {∅, 1o, 2o}
9	1, 8	eleq2s 2855	. . . 4 ⊢ (𝐶 ∈ 3o → (𝐶 = ∅ ∨ 𝐶 = 1o ∨ 𝐶 = 2o))
10		orc 868	. . . . . . 7 ⊢ (𝐶 = ∅ → (𝐶 = ∅ ∨ (𝐶 = (ω ↑o (ω ↑o 𝐶)) ∧ 𝐶 ∈ On)))
11		omcl2 43694	. . . . . . 7 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 = ∅ ∨ (𝐶 = (ω ↑o (ω ↑o 𝐶)) ∧ 𝐶 ∈ On))) → (𝐴 ·o 𝐵) ∈ 𝐶)
12	10, 11	sylan2 594	. . . . . 6 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ 𝐶 = ∅) → (𝐴 ·o 𝐵) ∈ 𝐶)
13	12	ex 412	. . . . 5 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐶 = ∅ → (𝐴 ·o 𝐵) ∈ 𝐶))
14		el1o 8432	. . . . . . . . 9 ⊢ (𝐴 ∈ 1o ↔ 𝐴 = ∅)
15		el1o 8432	. . . . . . . . 9 ⊢ (𝐵 ∈ 1o ↔ 𝐵 = ∅)
16		oveq12 7377	. . . . . . . . . 10 ⊢ ((𝐴 = ∅ ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) = (∅ ·o ∅))
17		0elon 6380	. . . . . . . . . . . 12 ⊢ ∅ ∈ On
18		om0 8454	. . . . . . . . . . . 12 ⊢ (∅ ∈ On → (∅ ·o ∅) = ∅)
19	17, 18	ax-mp 5	. . . . . . . . . . 11 ⊢ (∅ ·o ∅) = ∅
20		0lt1o 8441	. . . . . . . . . . 11 ⊢ ∅ ∈ 1o
21	19, 20	eqeltri 2833	. . . . . . . . . 10 ⊢ (∅ ·o ∅) ∈ 1o
22	16, 21	eqeltrdi 2845	. . . . . . . . 9 ⊢ ((𝐴 = ∅ ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) ∈ 1o)
23	14, 15, 22	syl2anb 599	. . . . . . . 8 ⊢ ((𝐴 ∈ 1o ∧ 𝐵 ∈ 1o) → (𝐴 ·o 𝐵) ∈ 1o)
24	23	a1i 11	. . . . . . 7 ⊢ (𝐶 = 1o → ((𝐴 ∈ 1o ∧ 𝐵 ∈ 1o) → (𝐴 ·o 𝐵) ∈ 1o))
25		eleq2 2826	. . . . . . . 8 ⊢ (𝐶 = 1o → (𝐴 ∈ 𝐶 ↔ 𝐴 ∈ 1o))
26		eleq2 2826	. . . . . . . 8 ⊢ (𝐶 = 1o → (𝐵 ∈ 𝐶 ↔ 𝐵 ∈ 1o))
27	25, 26	anbi12d 633	. . . . . . 7 ⊢ (𝐶 = 1o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ↔ (𝐴 ∈ 1o ∧ 𝐵 ∈ 1o)))
28		eleq2 2826	. . . . . . 7 ⊢ (𝐶 = 1o → ((𝐴 ·o 𝐵) ∈ 𝐶 ↔ (𝐴 ·o 𝐵) ∈ 1o))
29	24, 27, 28	3imtr4d 294	. . . . . 6 ⊢ (𝐶 = 1o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐴 ·o 𝐵) ∈ 𝐶))
30	29	com12 32	. . . . 5 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐶 = 1o → (𝐴 ·o 𝐵) ∈ 𝐶))
31		elpri 4606	. . . . . . . . . 10 ⊢ (𝐴 ∈ {∅, 1o} → (𝐴 = ∅ ∨ 𝐴 = 1o))
32	31, 3	eleq2s 2855	. . . . . . . . 9 ⊢ (𝐴 ∈ 2o → (𝐴 = ∅ ∨ 𝐴 = 1o))
33		elpri 4606	. . . . . . . . . 10 ⊢ (𝐵 ∈ {∅, 1o} → (𝐵 = ∅ ∨ 𝐵 = 1o))
34	33, 3	eleq2s 2855	. . . . . . . . 9 ⊢ (𝐵 ∈ 2o → (𝐵 = ∅ ∨ 𝐵 = 1o))
35		0ex 5254	. . . . . . . . . . . . 13 ⊢ ∅ ∈ V
36	35	prid1 4721	. . . . . . . . . . . 12 ⊢ ∅ ∈ {∅, 1o}
37	36, 19, 3	3eltr4i 2850	. . . . . . . . . . 11 ⊢ (∅ ·o ∅) ∈ 2o
38	16, 37	eqeltrdi 2845	. . . . . . . . . 10 ⊢ ((𝐴 = ∅ ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) ∈ 2o)
39		oveq12 7377	. . . . . . . . . . 11 ⊢ ((𝐴 = 1o ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) = (1o ·o ∅))
40		1on 8419	. . . . . . . . . . . . 13 ⊢ 1o ∈ On
41		om0 8454	. . . . . . . . . . . . 13 ⊢ (1o ∈ On → (1o ·o ∅) = ∅)
42	40, 41	ax-mp 5	. . . . . . . . . . . 12 ⊢ (1o ·o ∅) = ∅
43	36, 42, 3	3eltr4i 2850	. . . . . . . . . . 11 ⊢ (1o ·o ∅) ∈ 2o
44	39, 43	eqeltrdi 2845	. . . . . . . . . 10 ⊢ ((𝐴 = 1o ∧ 𝐵 = ∅) → (𝐴 ·o 𝐵) ∈ 2o)
45		oveq12 7377	. . . . . . . . . . 11 ⊢ ((𝐴 = ∅ ∧ 𝐵 = 1o) → (𝐴 ·o 𝐵) = (∅ ·o 1o))
46		om0r 8476	. . . . . . . . . . . . 13 ⊢ (1o ∈ On → (∅ ·o 1o) = ∅)
47	40, 46	ax-mp 5	. . . . . . . . . . . 12 ⊢ (∅ ·o 1o) = ∅
48	36, 47, 3	3eltr4i 2850	. . . . . . . . . . 11 ⊢ (∅ ·o 1o) ∈ 2o
49	45, 48	eqeltrdi 2845	. . . . . . . . . 10 ⊢ ((𝐴 = ∅ ∧ 𝐵 = 1o) → (𝐴 ·o 𝐵) ∈ 2o)
50		oveq12 7377	. . . . . . . . . . 11 ⊢ ((𝐴 = 1o ∧ 𝐵 = 1o) → (𝐴 ·o 𝐵) = (1o ·o 1o))
51		1oex 8417	. . . . . . . . . . . . 13 ⊢ 1o ∈ V
52	51	prid2 4722	. . . . . . . . . . . 12 ⊢ 1o ∈ {∅, 1o}
53		om1 8479	. . . . . . . . . . . . 13 ⊢ (1o ∈ On → (1o ·o 1o) = 1o)
54	40, 53	ax-mp 5	. . . . . . . . . . . 12 ⊢ (1o ·o 1o) = 1o
55	52, 54, 3	3eltr4i 2850	. . . . . . . . . . 11 ⊢ (1o ·o 1o) ∈ 2o
56	50, 55	eqeltrdi 2845	. . . . . . . . . 10 ⊢ ((𝐴 = 1o ∧ 𝐵 = 1o) → (𝐴 ·o 𝐵) ∈ 2o)
57	38, 44, 49, 56	ccase 1038	. . . . . . . . 9 ⊢ (((𝐴 = ∅ ∨ 𝐴 = 1o) ∧ (𝐵 = ∅ ∨ 𝐵 = 1o)) → (𝐴 ·o 𝐵) ∈ 2o)
58	32, 34, 57	syl2an 597	. . . . . . . 8 ⊢ ((𝐴 ∈ 2o ∧ 𝐵 ∈ 2o) → (𝐴 ·o 𝐵) ∈ 2o)
59	58	a1i 11	. . . . . . 7 ⊢ (𝐶 = 2o → ((𝐴 ∈ 2o ∧ 𝐵 ∈ 2o) → (𝐴 ·o 𝐵) ∈ 2o))
60		eleq2 2826	. . . . . . . 8 ⊢ (𝐶 = 2o → (𝐴 ∈ 𝐶 ↔ 𝐴 ∈ 2o))
61		eleq2 2826	. . . . . . . 8 ⊢ (𝐶 = 2o → (𝐵 ∈ 𝐶 ↔ 𝐵 ∈ 2o))
62	60, 61	anbi12d 633	. . . . . . 7 ⊢ (𝐶 = 2o → ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ↔ (𝐴 ∈ 2o ∧ 𝐵 ∈ 2o)))
63		eleq2 2826	. . . . . . 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 1432	. . . 4 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → ((𝐶 = ∅ ∨ 𝐶 = 1o ∨ 𝐶 = 2o) → (𝐴 ·o 𝐵) ∈ 𝐶))
67	9, 66	syl5 34	. . 3 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → (𝐶 ∈ 3o → (𝐴 ·o 𝐵) ∈ 𝐶))
68		olc 869	. . . . 5 ⊢ ((𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On) → (𝐶 = ∅ ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On)))
69		omcl2 43694	. . . . 5 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 = ∅ ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On))) → (𝐴 ·o 𝐵) ∈ 𝐶)
70	68, 69	sylan2 594	. . . 4 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On)) → (𝐴 ·o 𝐵) ∈ 𝐶)
71	70	ex 412	. . 3 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → ((𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On) → (𝐴 ·o 𝐵) ∈ 𝐶))
72	67, 71	jaod 860	. 2 ⊢ ((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) → ((𝐶 ∈ 3o ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On)) → (𝐴 ·o 𝐵) ∈ 𝐶))
73	72	imp 406	1 ⊢ (((𝐴 ∈ 𝐶 ∧ 𝐵 ∈ 𝐶) ∧ (𝐶 ∈ 3o ∨ (𝐶 = (ω ↑o (ω ↑o 𝐷)) ∧ 𝐷 ∈ On))) → (𝐴 ·o 𝐵) ∈ 𝐶)

Syntax hints:   → wi 4   ∧ wa 395   ∨ wo 848   ∨ w3o 1086   = wceq 1542   ∈ wcel 2114   ∪ cun 3901  ∅c0 4287  {csn 4582  {cpr 4584  {ctp 4586  Oncon0 6325  suc csuc 6327  (class class class)co 7368  ωcom 7818  1_oc1o 8400  2_oc2o 8401  3_oc3o 8402   ·_o comu 8405   ↑_o coe 8406

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5243  ax-nul 5253  ax-pr 5379  ax-un 7690  ax-reg 9509  ax-inf2 9562

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-rmo 3352  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-pss 3923  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-tp 4587  df-op 4589  df-ot 4591  df-uni 4866  df-int 4905  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-tr 5208  df-id 5527  df-eprel 5532  df-po 5540  df-so 5541  df-fr 5585  df-we 5587  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-pred 6267  df-ord 6328  df-on 6329  df-lim 6330  df-suc 6331  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-ov 7371  df-oprab 7372  df-mpo 7373  df-om 7819  df-1st 7943  df-2nd 7944  df-frecs 8233  df-wrecs 8264  df-recs 8313  df-rdg 8351  df-1o 8407  df-2o 8408  df-3o 8409  df-oadd 8411  df-omul 8412  df-oexp 8413

This theorem is referenced by: (None)