Theorem onmcl 44180

Description: If an ordinal is less than a power of omega, the product with a natural number is also less than that power of omega. (Contributed by RP, 19-Feb-2025.)

Assertion

Ref	Expression
onmcl	⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) → (𝐴 ∈ (ω ↑o 𝐵) → (𝐴 ·o 𝑁) ∈ (ω ↑o 𝐵)))

Proof of Theorem onmcl

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		oveq1 7424	. . . . 5 ⊢ (𝐴 = ∅ → (𝐴 ·o 𝑁) = (∅ ·o 𝑁))
2		simp3 1156	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) → 𝑁 ∈ ω)
3		nnon 7872	. . . . . 6 ⊢ (𝑁 ∈ ω → 𝑁 ∈ On)
4		om0r 8530	. . . . . 6 ⊢ (𝑁 ∈ On → (∅ ·o 𝑁) = ∅)
5	2, 3, 4	3syl 19	. . . . 5 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) → (∅ ·o 𝑁) = ∅)
6	1, 5	sylan9eqr 2819	. . . 4 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) ∧ 𝐴 = ∅) → (𝐴 ·o 𝑁) = ∅)
7		simpl2 1211	. . . . . 6 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) ∧ 𝐴 = ∅) → 𝐵 ∈ On)
8		omelon 9629	. . . . . 6 ⊢ ω ∈ On
9	7, 8	jctil 529	. . . . 5 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) ∧ 𝐴 = ∅) → (ω ∈ On ∧ 𝐵 ∈ On))
10		peano1 7889	. . . . 5 ⊢ ∅ ∈ ω
11		oen0 8578	. . . . 5 ⊢ (((ω ∈ On ∧ 𝐵 ∈ On) ∧ ∅ ∈ ω) → ∅ ∈ (ω ↑o 𝐵))
12	9, 10, 11	sylancl 598	. . . 4 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) ∧ 𝐴 = ∅) → ∅ ∈ (ω ↑o 𝐵))
13	6, 12	eqeltrd 2862	. . 3 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) ∧ 𝐴 = ∅) → (𝐴 ·o 𝑁) ∈ (ω ↑o 𝐵))
14	13	a1d 26	. 2 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) ∧ 𝐴 = ∅) → (𝐴 ∈ (ω ↑o 𝐵) → (𝐴 ·o 𝑁) ∈ (ω ↑o 𝐵)))
15	2	adantr 486	. . 3 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) ∧ ∅ ∈ 𝐴) → 𝑁 ∈ ω)
16		simp1 1154	. . . . 5 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) → 𝐴 ∈ On)
17	16	anim1i 627	. . . 4 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) ∧ ∅ ∈ 𝐴) → (𝐴 ∈ On ∧ ∅ ∈ 𝐴))
18		ondif1 8492	. . . 4 ⊢ (𝐴 ∈ (On ∖ 1o) ↔ (𝐴 ∈ On ∧ ∅ ∈ 𝐴))
19	17, 18	sylibr 237	. . 3 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) ∧ ∅ ∈ 𝐴) → 𝐴 ∈ (On ∖ 1o))
20		simpl2 1211	. . 3 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) ∧ ∅ ∈ 𝐴) → 𝐵 ∈ On)
21		oveq2 7425	. . . . . . 7 ⊢ (𝑥 = ∅ → (𝐴 ·o 𝑥) = (𝐴 ·o ∅))
22	21	eleq1d 2847	. . . . . 6 ⊢ (𝑥 = ∅ → ((𝐴 ·o 𝑥) ∈ (ω ↑o 𝐵) ↔ (𝐴 ·o ∅) ∈ (ω ↑o 𝐵)))
23	22	imbi2d 343	. . . . 5 ⊢ (𝑥 = ∅ → ((((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → (𝐴 ·o 𝑥) ∈ (ω ↑o 𝐵)) ↔ (((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → (𝐴 ·o ∅) ∈ (ω ↑o 𝐵))))
24		oveq2 7425	. . . . . . 7 ⊢ (𝑥 = 𝑦 → (𝐴 ·o 𝑥) = (𝐴 ·o 𝑦))
25	24	eleq1d 2847	. . . . . 6 ⊢ (𝑥 = 𝑦 → ((𝐴 ·o 𝑥) ∈ (ω ↑o 𝐵) ↔ (𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵)))
26	25	imbi2d 343	. . . . 5 ⊢ (𝑥 = 𝑦 → ((((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → (𝐴 ·o 𝑥) ∈ (ω ↑o 𝐵)) ↔ (((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → (𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵))))
27		oveq2 7425	. . . . . . 7 ⊢ (𝑥 = suc 𝑦 → (𝐴 ·o 𝑥) = (𝐴 ·o suc 𝑦))
28	27	eleq1d 2847	. . . . . 6 ⊢ (𝑥 = suc 𝑦 → ((𝐴 ·o 𝑥) ∈ (ω ↑o 𝐵) ↔ (𝐴 ·o suc 𝑦) ∈ (ω ↑o 𝐵)))
29	28	imbi2d 343	. . . . 5 ⊢ (𝑥 = suc 𝑦 → ((((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → (𝐴 ·o 𝑥) ∈ (ω ↑o 𝐵)) ↔ (((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → (𝐴 ·o suc 𝑦) ∈ (ω ↑o 𝐵))))
30		oveq2 7425	. . . . . . 7 ⊢ (𝑥 = 𝑁 → (𝐴 ·o 𝑥) = (𝐴 ·o 𝑁))
31	30	eleq1d 2847	. . . . . 6 ⊢ (𝑥 = 𝑁 → ((𝐴 ·o 𝑥) ∈ (ω ↑o 𝐵) ↔ (𝐴 ·o 𝑁) ∈ (ω ↑o 𝐵)))
32	31	imbi2d 343	. . . . 5 ⊢ (𝑥 = 𝑁 → ((((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → (𝐴 ·o 𝑥) ∈ (ω ↑o 𝐵)) ↔ (((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → (𝐴 ·o 𝑁) ∈ (ω ↑o 𝐵))))
33		eldifi 4081	. . . . . . . . 9 ⊢ (𝐴 ∈ (On ∖ 1o) → 𝐴 ∈ On)
34		om0 8508	. . . . . . . . 9 ⊢ (𝐴 ∈ On → (𝐴 ·o ∅) = ∅)
35	33, 34	syl 18	. . . . . . . 8 ⊢ (𝐴 ∈ (On ∖ 1o) → (𝐴 ·o ∅) = ∅)
36	35	adantr 486	. . . . . . 7 ⊢ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) → (𝐴 ·o ∅) = ∅)
37	8	jctl 533	. . . . . . . . 9 ⊢ (𝐵 ∈ On → (ω ∈ On ∧ 𝐵 ∈ On))
38	37, 10, 11	sylancl 598	. . . . . . . 8 ⊢ (𝐵 ∈ On → ∅ ∈ (ω ↑o 𝐵))
39	38	adantl 487	. . . . . . 7 ⊢ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) → ∅ ∈ (ω ↑o 𝐵))
40	36, 39	eqeltrd 2862	. . . . . 6 ⊢ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) → (𝐴 ·o ∅) ∈ (ω ↑o 𝐵))
41	40	adantr 486	. . . . 5 ⊢ (((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → (𝐴 ·o ∅) ∈ (ω ↑o 𝐵))
42	33	adantr 486	. . . . . . . . . 10 ⊢ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) → 𝐴 ∈ On)
43	42	ad2antrl 741	. . . . . . . . 9 ⊢ ((𝑦 ∈ ω ∧ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵))) → 𝐴 ∈ On)
44		simpll 779	. . . . . . . . 9 ⊢ (((𝑦 ∈ ω ∧ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵))) ∧ (𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵)) → 𝑦 ∈ ω)
45		onmsuc 8520	. . . . . . . . 9 ⊢ ((𝐴 ∈ On ∧ 𝑦 ∈ ω) → (𝐴 ·o suc 𝑦) = ((𝐴 ·o 𝑦) +o 𝐴))
46	43, 44, 45	syl2an2r 698	. . . . . . . 8 ⊢ (((𝑦 ∈ ω ∧ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵))) ∧ (𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵)) → (𝐴 ·o suc 𝑦) = ((𝐴 ·o 𝑦) +o 𝐴))
47		simpr 490	. . . . . . . . 9 ⊢ (((𝑦 ∈ ω ∧ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵))) ∧ (𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵)) → (𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵))
48		simplrr 790	. . . . . . . . 9 ⊢ (((𝑦 ∈ ω ∧ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵))) ∧ (𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵)) → 𝐴 ∈ (ω ↑o 𝐵))
49		eqid 2762	. . . . . . . . . . . . . 14 ⊢ (ω ↑o 𝐵) = (ω ↑o 𝐵)
50	49	jctl 533	. . . . . . . . . . . . 13 ⊢ (𝐵 ∈ On → ((ω ↑o 𝐵) = (ω ↑o 𝐵) ∧ 𝐵 ∈ On))
51	50	olcd 888	. . . . . . . . . . . 12 ⊢ (𝐵 ∈ On → ((ω ↑o 𝐵) = ∅ ∨ ((ω ↑o 𝐵) = (ω ↑o 𝐵) ∧ 𝐵 ∈ On)))
52	51	adantl 487	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) → ((ω ↑o 𝐵) = ∅ ∨ ((ω ↑o 𝐵) = (ω ↑o 𝐵) ∧ 𝐵 ∈ On)))
53	52	ad2antrl 741	. . . . . . . . . 10 ⊢ ((𝑦 ∈ ω ∧ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵))) → ((ω ↑o 𝐵) = ∅ ∨ ((ω ↑o 𝐵) = (ω ↑o 𝐵) ∧ 𝐵 ∈ On)))
54	53	adantr 486	. . . . . . . . 9 ⊢ (((𝑦 ∈ ω ∧ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵))) ∧ (𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵)) → ((ω ↑o 𝐵) = ∅ ∨ ((ω ↑o 𝐵) = (ω ↑o 𝐵) ∧ 𝐵 ∈ On)))
55		oacl2g 44179	. . . . . . . . 9 ⊢ ((((𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵) ∧ 𝐴 ∈ (ω ↑o 𝐵)) ∧ ((ω ↑o 𝐵) = ∅ ∨ ((ω ↑o 𝐵) = (ω ↑o 𝐵) ∧ 𝐵 ∈ On))) → ((𝐴 ·o 𝑦) +o 𝐴) ∈ (ω ↑o 𝐵))
56	47, 48, 54, 55	syl21anc 851	. . . . . . . 8 ⊢ (((𝑦 ∈ ω ∧ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵))) ∧ (𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵)) → ((𝐴 ·o 𝑦) +o 𝐴) ∈ (ω ↑o 𝐵))
57	46, 56	eqeltrd 2862	. . . . . . 7 ⊢ (((𝑦 ∈ ω ∧ ((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵))) ∧ (𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵)) → (𝐴 ·o suc 𝑦) ∈ (ω ↑o 𝐵))
58	57	exp31 425	. . . . . 6 ⊢ (𝑦 ∈ ω → (((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → ((𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵) → (𝐴 ·o suc 𝑦) ∈ (ω ↑o 𝐵))))
59	58	a2d 30	. . . . 5 ⊢ (𝑦 ∈ ω → ((((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → (𝐴 ·o 𝑦) ∈ (ω ↑o 𝐵)) → (((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → (𝐴 ·o suc 𝑦) ∈ (ω ↑o 𝐵))))
60	23, 26, 29, 32, 41, 59	finds 7897	. . . 4 ⊢ (𝑁 ∈ ω → (((𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On) ∧ 𝐴 ∈ (ω ↑o 𝐵)) → (𝐴 ·o 𝑁) ∈ (ω ↑o 𝐵)))
61	60	expdimp 458	. . 3 ⊢ ((𝑁 ∈ ω ∧ (𝐴 ∈ (On ∖ 1o) ∧ 𝐵 ∈ On)) → (𝐴 ∈ (ω ↑o 𝐵) → (𝐴 ·o 𝑁) ∈ (ω ↑o 𝐵)))
62	15, 19, 20, 61	syl12anc 850	. 2 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) ∧ ∅ ∈ 𝐴) → (𝐴 ∈ (ω ↑o 𝐵) → (𝐴 ·o 𝑁) ∈ (ω ↑o 𝐵)))
63		on0eqel 6487	. . 3 ⊢ (𝐴 ∈ On → (𝐴 = ∅ ∨ ∅ ∈ 𝐴))
64	16, 63	syl 18	. 2 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) → (𝐴 = ∅ ∨ ∅ ∈ 𝐴))
65	14, 62, 64	mpjaodan 973	1 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On ∧ 𝑁 ∈ ω) → (𝐴 ∈ (ω ↑o 𝐵) → (𝐴 ·o 𝑁) ∈ (ω ↑o 𝐵)))

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   ∨ wo 861   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145   ∖ cdif 3899  ∅c0 4282  Oncon0 6361  suc csuc 6363  (class class class)co 7417  ωcom 7866  1_oc1o 8452   +_o coa 8456   ·_o comu 8457   ↑_o coe 8458

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 2215  ax-ext 2734  ax-rep 5236  ax-sep 5255  ax-nul 5267  ax-pr 5402  ax-un 7740  ax-inf2 9624

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 2566  df-eu 2596  df-clab 2741  df-cleq 2754  df-clel 2837  df-nfc 2911  df-ne 2958  df-ral 3079  df-rex 3089  df-rmo 3367  df-reu 3368  df-rab 3415  df-v 3455  df-sbc 3743  df-csb 3851  df-dif 3905  df-un 3907  df-in 3909  df-ss 3919  df-pss 3922  df-nul 4283  df-if 4486  df-pw 4562  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4871  df-int 4911  df-iun 4956  df-br 5108  df-opab 5172  df-mpt 5191  df-tr 5217  df-id 5554  df-eprel 5559  df-po 5567  df-so 5568  df-fr 5612  df-we 5614  df-xp 5665  df-rel 5666  df-cnv 5667  df-co 5668  df-dm 5669  df-rn 5670  df-res 5671  df-ima 5672  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 7420  df-oprab 7421  df-mpo 7422  df-om 7867  df-1st 7990  df-2nd 7991  df-frecs 8284  df-wrecs 8315  df-recs 8364  df-rdg 8403  df-1o 8459  df-2o 8460  df-oadd 8463  df-omul 8464  df-oexp 8465

This theorem is used by: (None)