Theorem oecl 8527

Description: Closure law for ordinal exponentiation. Remark 2.8 of [Schloeder] p. 5. (Contributed by NM, 1-Jan-2005.) (Proof shortened by Andrew Salmon, 22-Oct-2011.)

Assertion

Ref	Expression
oecl	⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴 ↑o 𝐵) ∈ On)

Proof of Theorem oecl

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

Step	Hyp	Ref	Expression
1		oveq2 7422	. . . . . . . 8 ⊢ (𝐵 = ∅ → (∅ ↑o 𝐵) = (∅ ↑o ∅))
2		oe0m0 8510	. . . . . . . . 9 ⊢ (∅ ↑o ∅) = 1o
3		1on 8471	. . . . . . . . 9 ⊢ 1o ∈ On
4	2, 3	eqeltri 2856	. . . . . . . 8 ⊢ (∅ ↑o ∅) ∈ On
5	1, 4	eqeltrdi 2868	. . . . . . 7 ⊢ (𝐵 = ∅ → (∅ ↑o 𝐵) ∈ On)
6	5	adantl 487	. . . . . 6 ⊢ ((𝐵 ∈ On ∧ 𝐵 = ∅) → (∅ ↑o 𝐵) ∈ On)
7		oe0m1 8511	. . . . . . . . 9 ⊢ (𝐵 ∈ On → (∅ ∈ 𝐵 ↔ (∅ ↑o 𝐵) = ∅))
8	7	biimpa 482	. . . . . . . 8 ⊢ ((𝐵 ∈ On ∧ ∅ ∈ 𝐵) → (∅ ↑o 𝐵) = ∅)
9		0elon 6413	. . . . . . . 8 ⊢ ∅ ∈ On
10	8, 9	eqeltrdi 2868	. . . . . . 7 ⊢ ((𝐵 ∈ On ∧ ∅ ∈ 𝐵) → (∅ ↑o 𝐵) ∈ On)
11	10	adantll 727	. . . . . 6 ⊢ (((𝐵 ∈ On ∧ 𝐵 ∈ On) ∧ ∅ ∈ 𝐵) → (∅ ↑o 𝐵) ∈ On)
12	6, 11	oe0lem 8503	. . . . 5 ⊢ ((𝐵 ∈ On ∧ 𝐵 ∈ On) → (∅ ↑o 𝐵) ∈ On)
13	12	anidms 577	. . . 4 ⊢ (𝐵 ∈ On → (∅ ↑o 𝐵) ∈ On)
14		oveq1 7421	. . . . 5 ⊢ (𝐴 = ∅ → (𝐴 ↑o 𝐵) = (∅ ↑o 𝐵))
15	14	eleq1d 2845	. . . 4 ⊢ (𝐴 = ∅ → ((𝐴 ↑o 𝐵) ∈ On ↔ (∅ ↑o 𝐵) ∈ On))
16	13, 15	imbitrrid 249	. . 3 ⊢ (𝐴 = ∅ → (𝐵 ∈ On → (𝐴 ↑o 𝐵) ∈ On))
17	16	impcom 413	. 2 ⊢ ((𝐵 ∈ On ∧ 𝐴 = ∅) → (𝐴 ↑o 𝐵) ∈ On)
18		oveq2 7422	. . . . . . 7 ⊢ (𝑥 = ∅ → (𝐴 ↑o 𝑥) = (𝐴 ↑o ∅))
19	18	eleq1d 2845	. . . . . 6 ⊢ (𝑥 = ∅ → ((𝐴 ↑o 𝑥) ∈ On ↔ (𝐴 ↑o ∅) ∈ On))
20		oveq2 7422	. . . . . . 7 ⊢ (𝑥 = 𝑦 → (𝐴 ↑o 𝑥) = (𝐴 ↑o 𝑦))
21	20	eleq1d 2845	. . . . . 6 ⊢ (𝑥 = 𝑦 → ((𝐴 ↑o 𝑥) ∈ On ↔ (𝐴 ↑o 𝑦) ∈ On))
22		oveq2 7422	. . . . . . 7 ⊢ (𝑥 = suc 𝑦 → (𝐴 ↑o 𝑥) = (𝐴 ↑o suc 𝑦))
23	22	eleq1d 2845	. . . . . 6 ⊢ (𝑥 = suc 𝑦 → ((𝐴 ↑o 𝑥) ∈ On ↔ (𝐴 ↑o suc 𝑦) ∈ On))
24		oveq2 7422	. . . . . . 7 ⊢ (𝑥 = 𝐵 → (𝐴 ↑o 𝑥) = (𝐴 ↑o 𝐵))
25	24	eleq1d 2845	. . . . . 6 ⊢ (𝑥 = 𝐵 → ((𝐴 ↑o 𝑥) ∈ On ↔ (𝐴 ↑o 𝐵) ∈ On))
26		oe0 8512	. . . . . . . 8 ⊢ (𝐴 ∈ On → (𝐴 ↑o ∅) = 1o)
27	26, 3	eqeltrdi 2868	. . . . . . 7 ⊢ (𝐴 ∈ On → (𝐴 ↑o ∅) ∈ On)
28	27	adantr 486	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ ∅ ∈ 𝐴) → (𝐴 ↑o ∅) ∈ On)
29		omcl 8526	. . . . . . . . . . 11 ⊢ (((𝐴 ↑o 𝑦) ∈ On ∧ 𝐴 ∈ On) → ((𝐴 ↑o 𝑦) ·o 𝐴) ∈ On)
30	29	expcom 419	. . . . . . . . . 10 ⊢ (𝐴 ∈ On → ((𝐴 ↑o 𝑦) ∈ On → ((𝐴 ↑o 𝑦) ·o 𝐴) ∈ On))
31	30	adantr 486	. . . . . . . . 9 ⊢ ((𝐴 ∈ On ∧ 𝑦 ∈ On) → ((𝐴 ↑o 𝑦) ∈ On → ((𝐴 ↑o 𝑦) ·o 𝐴) ∈ On))
32		oesuc 8517	. . . . . . . . . 10 ⊢ ((𝐴 ∈ On ∧ 𝑦 ∈ On) → (𝐴 ↑o suc 𝑦) = ((𝐴 ↑o 𝑦) ·o 𝐴))
33	32	eleq1d 2845	. . . . . . . . 9 ⊢ ((𝐴 ∈ On ∧ 𝑦 ∈ On) → ((𝐴 ↑o suc 𝑦) ∈ On ↔ ((𝐴 ↑o 𝑦) ·o 𝐴) ∈ On))
34	31, 33	sylibrd 262	. . . . . . . 8 ⊢ ((𝐴 ∈ On ∧ 𝑦 ∈ On) → ((𝐴 ↑o 𝑦) ∈ On → (𝐴 ↑o suc 𝑦) ∈ On))
35	34	expcom 419	. . . . . . 7 ⊢ (𝑦 ∈ On → (𝐴 ∈ On → ((𝐴 ↑o 𝑦) ∈ On → (𝐴 ↑o suc 𝑦) ∈ On)))
36	35	adantrd 497	. . . . . 6 ⊢ (𝑦 ∈ On → ((𝐴 ∈ On ∧ ∅ ∈ 𝐴) → ((𝐴 ↑o 𝑦) ∈ On → (𝐴 ↑o suc 𝑦) ∈ On)))
37		vex 3454	. . . . . . . . 9 ⊢ 𝑥 ∈ V
38		iunon 8329	. . . . . . . . 9 ⊢ ((𝑥 ∈ V ∧ ∀𝑦 ∈ 𝑥 (𝐴 ↑o 𝑦) ∈ On) → ∪ 𝑦 ∈ 𝑥 (𝐴 ↑o 𝑦) ∈ On)
39	37, 38	mpan 703	. . . . . . . 8 ⊢ (∀𝑦 ∈ 𝑥 (𝐴 ↑o 𝑦) ∈ On → ∪ 𝑦 ∈ 𝑥 (𝐴 ↑o 𝑦) ∈ On)
40		oelim 8524	. . . . . . . . . . . 12 ⊢ (((𝐴 ∈ On ∧ (𝑥 ∈ V ∧ Lim 𝑥)) ∧ ∅ ∈ 𝐴) → (𝐴 ↑o 𝑥) = ∪ 𝑦 ∈ 𝑥 (𝐴 ↑o 𝑦))
41	37, 40	mpanlr1 719	. . . . . . . . . . 11 ⊢ (((𝐴 ∈ On ∧ Lim 𝑥) ∧ ∅ ∈ 𝐴) → (𝐴 ↑o 𝑥) = ∪ 𝑦 ∈ 𝑥 (𝐴 ↑o 𝑦))
42	41	anasss 472	. . . . . . . . . 10 ⊢ ((𝐴 ∈ On ∧ (Lim 𝑥 ∧ ∅ ∈ 𝐴)) → (𝐴 ↑o 𝑥) = ∪ 𝑦 ∈ 𝑥 (𝐴 ↑o 𝑦))
43	42	an12s 662	. . . . . . . . 9 ⊢ ((Lim 𝑥 ∧ (𝐴 ∈ On ∧ ∅ ∈ 𝐴)) → (𝐴 ↑o 𝑥) = ∪ 𝑦 ∈ 𝑥 (𝐴 ↑o 𝑦))
44	43	eleq1d 2845	. . . . . . . 8 ⊢ ((Lim 𝑥 ∧ (𝐴 ∈ On ∧ ∅ ∈ 𝐴)) → ((𝐴 ↑o 𝑥) ∈ On ↔ ∪ 𝑦 ∈ 𝑥 (𝐴 ↑o 𝑦) ∈ On))
45	39, 44	imbitrrid 249	. . . . . . 7 ⊢ ((Lim 𝑥 ∧ (𝐴 ∈ On ∧ ∅ ∈ 𝐴)) → (∀𝑦 ∈ 𝑥 (𝐴 ↑o 𝑦) ∈ On → (𝐴 ↑o 𝑥) ∈ On))
46	45	ex 418	. . . . . 6 ⊢ (Lim 𝑥 → ((𝐴 ∈ On ∧ ∅ ∈ 𝐴) → (∀𝑦 ∈ 𝑥 (𝐴 ↑o 𝑦) ∈ On → (𝐴 ↑o 𝑥) ∈ On)))
47	19, 21, 23, 25, 28, 36, 46	tfinds3 7862	. . . . 5 ⊢ (𝐵 ∈ On → ((𝐴 ∈ On ∧ ∅ ∈ 𝐴) → (𝐴 ↑o 𝐵) ∈ On))
48	47	expd 421	. . . 4 ⊢ (𝐵 ∈ On → (𝐴 ∈ On → (∅ ∈ 𝐴 → (𝐴 ↑o 𝐵) ∈ On)))
49	48	com12 33	. . 3 ⊢ (𝐴 ∈ On → (𝐵 ∈ On → (∅ ∈ 𝐴 → (𝐴 ↑o 𝐵) ∈ On)))
50	49	imp31 423	. 2 ⊢ (((𝐴 ∈ On ∧ 𝐵 ∈ On) ∧ ∅ ∈ 𝐴) → (𝐴 ↑o 𝐵) ∈ On)
51	17, 50	oe0lem 8503	1 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴 ↑o 𝐵) ∈ On)

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2145  ∀wral 3076  Vcvv 3450  ∅c0 4279  ∪ ciun 4951  Oncon0 6357  Lim wlim 6358  suc csuc 6359  (class class class)co 7414  1_oc1o 8451   ·_o comu 8456   ↑_o coe 8457

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 2732  ax-rep 5232  ax-sep 5251  ax-nul 5263  ax-pr 5398  ax-un 7737

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 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  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-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5550  df-eprel 5555  df-po 5563  df-so 5564  df-fr 5608  df-we 5610  df-xp 5661  df-rel 5662  df-cnv 5663  df-co 5664  df-dm 5665  df-rn 5666  df-res 5667  df-ima 5668  df-pred 6299  df-ord 6360  df-on 6361  df-lim 6362  df-suc 6363  df-iota 6489  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-ov 7417  df-oprab 7418  df-mpo 7419  df-om 7864  df-2nd 7988  df-frecs 8281  df-wrecs 8312  df-recs 8361  df-rdg 8400  df-1o 8458  df-oadd 8462  df-omul 8463  df-oexp 8464

This theorem is used by:  oen0  8577  oeordi  8578  oeord  8579  oecan  8580  oeword  8581  oewordri  8583  oeworde  8584  oeordsuc  8585  oeoalem  8587  oeoa  8588  oeoelem  8589  oeoe  8590  oelimcl  8591  oeeulem  8592  oeeui  8593  oaabs2  8640  omabs  8642  cantnfle  9653  cantnflt  9654  cantnfp1  9663  cantnflem1d  9670  cantnflem1  9671  cantnflem2  9672  cantnflem3  9673  cantnflem4  9674  cantnf  9675  oemapwe  9676  cantnffval2  9677  cnfcomlem  9681  cnfcom  9682  cnfcom3lem  9685  cnfcom3  9686  infxpenc  10024  onexoegt  44088  oaomoecl  44122  oenassex  44162  cantnftermord  44164  cantnfresb  44168  oacl2g  44174  omabs2  44176  omcl2  44177  ofoaf  44199  ofoafo  44200