Theorem oaun3 44574

Description: Ordinal addition as a union of classes. (Contributed by RP, 13-Feb-2025.)

Assertion

Ref	Expression
oaun3	⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴 +o 𝐵) = ∪ {{𝑥 ∣ ∃𝑎 ∈ 𝐴 𝑥 = 𝑎}, {𝑦 ∣ ∃𝑏 ∈ 𝐵 𝑦 = (𝐴 +o 𝑏)}, {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}})

Distinct variable groups:   𝐴,𝑎,𝑏,𝑥,𝑦,𝑧   𝐵,𝑎,𝑏,𝑥,𝑦,𝑧

Proof of Theorem oaun3

Step	Hyp	Ref	Expression
1		oacl 8568	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴 +o 𝐵) ∈ On)
2	1	difexd 5297	. . . . 5 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((𝐴 +o 𝐵) ∖ 𝐴) ∈ V)
3		uniprg 4886	. . . . 5 ⊢ ((𝐴 ∈ On ∧ ((𝐴 +o 𝐵) ∖ 𝐴) ∈ V) → ∪ {𝐴, ((𝐴 +o 𝐵) ∖ 𝐴)} = (𝐴 ∪ ((𝐴 +o 𝐵) ∖ 𝐴)))
4	2, 3	syldan 603	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∪ {𝐴, ((𝐴 +o 𝐵) ∖ 𝐴)} = (𝐴 ∪ ((𝐴 +o 𝐵) ∖ 𝐴)))
5		undif2 4434	. . . . 5 ⊢ (𝐴 ∪ ((𝐴 +o 𝐵) ∖ 𝐴)) = (𝐴 ∪ (𝐴 +o 𝐵))
6		oaword1 8585	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐴 ⊆ (𝐴 +o 𝐵))
7		ssequn1 4187	. . . . . 6 ⊢ (𝐴 ⊆ (𝐴 +o 𝐵) ↔ (𝐴 ∪ (𝐴 +o 𝐵)) = (𝐴 +o 𝐵))
8	6, 7	sylib 221	. . . . 5 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴 ∪ (𝐴 +o 𝐵)) = (𝐴 +o 𝐵))
9	5, 8	eqtrid 2810	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴 ∪ ((𝐴 +o 𝐵) ∖ 𝐴)) = (𝐴 +o 𝐵))
10	4, 9	eqtrd 2798	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∪ {𝐴, ((𝐴 +o 𝐵) ∖ 𝐴)} = (𝐴 +o 𝐵))
11		oaun3lem4 44569	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)} ∈ suc (𝐴 +o 𝐵))
12		unisng 4888	. . . 4 ⊢ ({𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)} ∈ suc (𝐴 +o 𝐵) → ∪ {{𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}} = {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)})
13	11, 12	syl 18	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∪ {{𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}} = {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)})
14	10, 13	uneq12d 4171	. 2 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (∪ {𝐴, ((𝐴 +o 𝐵) ∖ 𝐴)} ∪ ∪ {{𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}}) = ((𝐴 +o 𝐵) ∪ {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}))
15		uniun 4893	. . 3 ⊢ ∪ ({𝐴, ((𝐴 +o 𝐵) ∖ 𝐴)} ∪ {{𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}}) = (∪ {𝐴, ((𝐴 +o 𝐵) ∖ 𝐴)} ∪ ∪ {{𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}})
16		df-tp 4593	. . . . 5 ⊢ {𝐴, ((𝐴 +o 𝐵) ∖ 𝐴), {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}} = ({𝐴, ((𝐴 +o 𝐵) ∖ 𝐴)} ∪ {{𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}})
17		rp-abid 44570	. . . . . . 7 ⊢ 𝐴 = {𝑥 ∣ ∃𝑎 ∈ 𝐴 𝑥 = 𝑎}
18	17	a1i 11	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → 𝐴 = {𝑥 ∣ ∃𝑎 ∈ 𝐴 𝑥 = 𝑎})
19		oadif1 44572	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((𝐴 +o 𝐵) ∖ 𝐴) = {𝑦 ∣ ∃𝑏 ∈ 𝐵 𝑦 = (𝐴 +o 𝑏)})
20		eqidd 2764	. . . . . 6 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)} = {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)})
21	18, 19, 20	tpeq123d 4709	. . . . 5 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → {𝐴, ((𝐴 +o 𝐵) ∖ 𝐴), {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}} = {{𝑥 ∣ ∃𝑎 ∈ 𝐴 𝑥 = 𝑎}, {𝑦 ∣ ∃𝑏 ∈ 𝐵 𝑦 = (𝐴 +o 𝑏)}, {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}})
22	16, 21	eqtr3id 2812	. . . 4 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ({𝐴, ((𝐴 +o 𝐵) ∖ 𝐴)} ∪ {{𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}}) = {{𝑥 ∣ ∃𝑎 ∈ 𝐴 𝑥 = 𝑎}, {𝑦 ∣ ∃𝑏 ∈ 𝐵 𝑦 = (𝐴 +o 𝑏)}, {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}})
23	22	unieqd 4883	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ∪ ({𝐴, ((𝐴 +o 𝐵) ∖ 𝐴)} ∪ {{𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}}) = ∪ {{𝑥 ∣ ∃𝑎 ∈ 𝐴 𝑥 = 𝑎}, {𝑦 ∣ ∃𝑏 ∈ 𝐵 𝑦 = (𝐴 +o 𝑏)}, {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}})
24	15, 23	eqtr3id 2812	. 2 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (∪ {𝐴, ((𝐴 +o 𝐵) ∖ 𝐴)} ∪ ∪ {{𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}}) = ∪ {{𝑥 ∣ ∃𝑎 ∈ 𝐴 𝑥 = 𝑎}, {𝑦 ∣ ∃𝑏 ∈ 𝐵 𝑦 = (𝐴 +o 𝑏)}, {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}})
25		oaun3lem2 44567	. . 3 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)} ⊆ (𝐴 +o 𝐵))
26		ssequn2 4190	. . 3 ⊢ ({𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)} ⊆ (𝐴 +o 𝐵) ↔ ((𝐴 +o 𝐵) ∪ {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}) = (𝐴 +o 𝐵))
27	25, 26	sylib 221	. 2 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → ((𝐴 +o 𝐵) ∪ {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}) = (𝐴 +o 𝐵))
28	14, 24, 27	3eqtr3rd 2807	1 ⊢ ((𝐴 ∈ On ∧ 𝐵 ∈ On) → (𝐴 +o 𝐵) = ∪ {{𝑥 ∣ ∃𝑎 ∈ 𝐴 𝑥 = 𝑎}, {𝑦 ∣ ∃𝑏 ∈ 𝐵 𝑦 = (𝐴 +o 𝑏)}, {𝑧 ∣ ∃𝑎 ∈ 𝐴 ∃𝑏 ∈ 𝐵 𝑧 = (𝑎 +o 𝑏)}})

This proof depends on syntax axioms:   → wi 4   ∧ wa 401   = wceq 1570   ∈ wcel 2147  {cab 2741  ∃wrex 3090  Vcvv 3454   ⊆ wss 3900   ∖ cdif 4048   ∪ cun 4152  {csn 4588  {cpr 4590  {ctp 4592  ∪ cuni 4870  Oncon0 6377  suc csuc 6379  (class class class)co 7440   +_o coa 8498

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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5235  ax-sep 5252  ax-nul 5263  ax-pr 5395  ax-un 7772

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 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-tp 4593  df-op 4839  df-uni 4871  df-int 4911  df-iun 4956  df-br 5107  df-opab 5171  df-mpt 5190  df-tr 5216  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 6319  df-ord 6380  df-on 6381  df-lim 6382  df-suc 6383  df-iota 6509  df-fun 6557  df-fn 6558  df-f 6559  df-f1 6560  df-fo 6561  df-f1o 6562  df-fv 6563  df-ov 7443  df-oprab 7444  df-mpo 7445  df-om 7899  df-2nd 8023  df-frecs 8324  df-wrecs 8355  df-recs 8404  df-rdg 8443  df-oadd 8505

This theorem is used by: (None)