Theorem addsunif 28418

Description: Uniformity theorem for surreal addition. This theorem states that we can use any cuts that define 𝐴 and 𝐵 in the definition of surreal addition. Theorem 3.2 of [Gonshor] p. 15. (Contributed by Scott Fenton, 21-Jan-2025.)

Hypotheses

Ref	Expression
addsunif.1	⊢ (𝜑 → 𝐿 <<s 𝑅)
addsunif.2	⊢ (𝜑 → 𝑀 <<s 𝑆)
addsunif.3	⊢ (𝜑 → 𝐴 = (𝐿 |s 𝑅))
addsunif.4	⊢ (𝜑 → 𝐵 = (𝑀 |s 𝑆))

Assertion

Ref	Expression
addsunif	⊢ (𝜑 → (𝐴 +s 𝐵) = (({𝑦 ∣ ∃𝑙 ∈ 𝐿 𝑦 = (𝑙 +s 𝐵)} ∪ {𝑧 ∣ ∃𝑚 ∈ 𝑀 𝑧 = (𝐴 +s 𝑚)}) |s ({𝑤 ∣ ∃𝑟 ∈ 𝑅 𝑤 = (𝑟 +s 𝐵)} ∪ {𝑡 ∣ ∃𝑠 ∈ 𝑆 𝑡 = (𝐴 +s 𝑠)})))

Distinct variable groups:   𝐴,𝑚   𝐴,𝑠,𝑡   𝑧,𝐴   𝐵,𝑙   𝐵,𝑟,𝑤   𝑦,𝐵   𝐿,𝑙,𝑦   𝑚,𝑀,𝑧   𝑅,𝑟,𝑤   𝑆,𝑠,𝑡

Allowed substitution hints:   𝜑(𝑦, 𝑧, 𝑤, 𝑡, 𝑚, 𝑠, 𝑟, 𝑙)   𝐴(𝑦, 𝑤, 𝑟, 𝑙)   𝐵(𝑧, 𝑡, 𝑚, 𝑠)   𝑅(𝑦, 𝑧, 𝑡, 𝑚, 𝑠, 𝑙)   𝑆(𝑦, 𝑧, 𝑤, 𝑚, 𝑟, 𝑙)   𝐿(𝑧, 𝑤, 𝑡, 𝑚, 𝑠, 𝑟)   𝑀(𝑦, 𝑤, 𝑡, 𝑠, 𝑟, 𝑙)

Proof of Theorem addsunif

Dummy variables 𝑎 𝑏 𝑐 𝑑 𝑒 𝑓 𝑔 ℎ are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		addsunif.1	. . 3 ⊢ (𝜑 → 𝐿 <<s 𝑅)
2		addsunif.2	. . 3 ⊢ (𝜑 → 𝑀 <<s 𝑆)
3		addsunif.3	. . 3 ⊢ (𝜑 → 𝐴 = (𝐿 |s 𝑅))
4		addsunif.4	. . 3 ⊢ (𝜑 → 𝐵 = (𝑀 |s 𝑆))
5	1, 2, 3, 4	addsuniflem 28417	. 2 ⊢ (𝜑 → (𝐴 +s 𝐵) = (({𝑎 ∣ ∃𝑏 ∈ 𝐿 𝑎 = (𝑏 +s 𝐵)} ∪ {𝑐 ∣ ∃𝑑 ∈ 𝑀 𝑐 = (𝐴 +s 𝑑)}) |s ({𝑒 ∣ ∃𝑓 ∈ 𝑅 𝑒 = (𝑓 +s 𝐵)} ∪ {𝑔 ∣ ∃ℎ ∈ 𝑆 𝑔 = (𝐴 +s ℎ)})))
6		oveq1 7450	. . . . . . . 8 ⊢ (𝑙 = 𝑏 → (𝑙 +s 𝐵) = (𝑏 +s 𝐵))
7	6	eqeq2d 2774	. . . . . . 7 ⊢ (𝑙 = 𝑏 → (𝑦 = (𝑙 +s 𝐵) ↔ 𝑦 = (𝑏 +s 𝐵)))
8	7	cbvrexvw 3245	. . . . . 6 ⊢ (∃𝑙 ∈ 𝐿 𝑦 = (𝑙 +s 𝐵) ↔ ∃𝑏 ∈ 𝐿 𝑦 = (𝑏 +s 𝐵))
9		eqeq1 2767	. . . . . . 7 ⊢ (𝑦 = 𝑎 → (𝑦 = (𝑏 +s 𝐵) ↔ 𝑎 = (𝑏 +s 𝐵)))
10	9	rexbidv 3190	. . . . . 6 ⊢ (𝑦 = 𝑎 → (∃𝑏 ∈ 𝐿 𝑦 = (𝑏 +s 𝐵) ↔ ∃𝑏 ∈ 𝐿 𝑎 = (𝑏 +s 𝐵)))
11	8, 10	bitrid 286	. . . . 5 ⊢ (𝑦 = 𝑎 → (∃𝑙 ∈ 𝐿 𝑦 = (𝑙 +s 𝐵) ↔ ∃𝑏 ∈ 𝐿 𝑎 = (𝑏 +s 𝐵)))
12	11	cbvabv 2834	. . . 4 ⊢ {𝑦 ∣ ∃𝑙 ∈ 𝐿 𝑦 = (𝑙 +s 𝐵)} = {𝑎 ∣ ∃𝑏 ∈ 𝐿 𝑎 = (𝑏 +s 𝐵)}
13		oveq2 7451	. . . . . . . 8 ⊢ (𝑚 = 𝑑 → (𝐴 +s 𝑚) = (𝐴 +s 𝑑))
14	13	eqeq2d 2774	. . . . . . 7 ⊢ (𝑚 = 𝑑 → (𝑧 = (𝐴 +s 𝑚) ↔ 𝑧 = (𝐴 +s 𝑑)))
15	14	cbvrexvw 3245	. . . . . 6 ⊢ (∃𝑚 ∈ 𝑀 𝑧 = (𝐴 +s 𝑚) ↔ ∃𝑑 ∈ 𝑀 𝑧 = (𝐴 +s 𝑑))
16		eqeq1 2767	. . . . . . 7 ⊢ (𝑧 = 𝑐 → (𝑧 = (𝐴 +s 𝑑) ↔ 𝑐 = (𝐴 +s 𝑑)))
17	16	rexbidv 3190	. . . . . 6 ⊢ (𝑧 = 𝑐 → (∃𝑑 ∈ 𝑀 𝑧 = (𝐴 +s 𝑑) ↔ ∃𝑑 ∈ 𝑀 𝑐 = (𝐴 +s 𝑑)))
18	15, 17	bitrid 286	. . . . 5 ⊢ (𝑧 = 𝑐 → (∃𝑚 ∈ 𝑀 𝑧 = (𝐴 +s 𝑚) ↔ ∃𝑑 ∈ 𝑀 𝑐 = (𝐴 +s 𝑑)))
19	18	cbvabv 2834	. . . 4 ⊢ {𝑧 ∣ ∃𝑚 ∈ 𝑀 𝑧 = (𝐴 +s 𝑚)} = {𝑐 ∣ ∃𝑑 ∈ 𝑀 𝑐 = (𝐴 +s 𝑑)}
20	12, 19	uneq12i 4168	. . 3 ⊢ ({𝑦 ∣ ∃𝑙 ∈ 𝐿 𝑦 = (𝑙 +s 𝐵)} ∪ {𝑧 ∣ ∃𝑚 ∈ 𝑀 𝑧 = (𝐴 +s 𝑚)}) = ({𝑎 ∣ ∃𝑏 ∈ 𝐿 𝑎 = (𝑏 +s 𝐵)} ∪ {𝑐 ∣ ∃𝑑 ∈ 𝑀 𝑐 = (𝐴 +s 𝑑)})
21		oveq1 7450	. . . . . . . 8 ⊢ (𝑟 = 𝑓 → (𝑟 +s 𝐵) = (𝑓 +s 𝐵))
22	21	eqeq2d 2774	. . . . . . 7 ⊢ (𝑟 = 𝑓 → (𝑤 = (𝑟 +s 𝐵) ↔ 𝑤 = (𝑓 +s 𝐵)))
23	22	cbvrexvw 3245	. . . . . 6 ⊢ (∃𝑟 ∈ 𝑅 𝑤 = (𝑟 +s 𝐵) ↔ ∃𝑓 ∈ 𝑅 𝑤 = (𝑓 +s 𝐵))
24		eqeq1 2767	. . . . . . 7 ⊢ (𝑤 = 𝑒 → (𝑤 = (𝑓 +s 𝐵) ↔ 𝑒 = (𝑓 +s 𝐵)))
25	24	rexbidv 3190	. . . . . 6 ⊢ (𝑤 = 𝑒 → (∃𝑓 ∈ 𝑅 𝑤 = (𝑓 +s 𝐵) ↔ ∃𝑓 ∈ 𝑅 𝑒 = (𝑓 +s 𝐵)))
26	23, 25	bitrid 286	. . . . 5 ⊢ (𝑤 = 𝑒 → (∃𝑟 ∈ 𝑅 𝑤 = (𝑟 +s 𝐵) ↔ ∃𝑓 ∈ 𝑅 𝑒 = (𝑓 +s 𝐵)))
27	26	cbvabv 2834	. . . 4 ⊢ {𝑤 ∣ ∃𝑟 ∈ 𝑅 𝑤 = (𝑟 +s 𝐵)} = {𝑒 ∣ ∃𝑓 ∈ 𝑅 𝑒 = (𝑓 +s 𝐵)}
28		oveq2 7451	. . . . . . . 8 ⊢ (𝑠 = ℎ → (𝐴 +s 𝑠) = (𝐴 +s ℎ))
29	28	eqeq2d 2774	. . . . . . 7 ⊢ (𝑠 = ℎ → (𝑡 = (𝐴 +s 𝑠) ↔ 𝑡 = (𝐴 +s ℎ)))
30	29	cbvrexvw 3245	. . . . . 6 ⊢ (∃𝑠 ∈ 𝑆 𝑡 = (𝐴 +s 𝑠) ↔ ∃ℎ ∈ 𝑆 𝑡 = (𝐴 +s ℎ))
31		eqeq1 2767	. . . . . . 7 ⊢ (𝑡 = 𝑔 → (𝑡 = (𝐴 +s ℎ) ↔ 𝑔 = (𝐴 +s ℎ)))
32	31	rexbidv 3190	. . . . . 6 ⊢ (𝑡 = 𝑔 → (∃ℎ ∈ 𝑆 𝑡 = (𝐴 +s ℎ) ↔ ∃ℎ ∈ 𝑆 𝑔 = (𝐴 +s ℎ)))
33	30, 32	bitrid 286	. . . . 5 ⊢ (𝑡 = 𝑔 → (∃𝑠 ∈ 𝑆 𝑡 = (𝐴 +s 𝑠) ↔ ∃ℎ ∈ 𝑆 𝑔 = (𝐴 +s ℎ)))
34	33	cbvabv 2834	. . . 4 ⊢ {𝑡 ∣ ∃𝑠 ∈ 𝑆 𝑡 = (𝐴 +s 𝑠)} = {𝑔 ∣ ∃ℎ ∈ 𝑆 𝑔 = (𝐴 +s ℎ)}
35	27, 34	uneq12i 4168	. . 3 ⊢ ({𝑤 ∣ ∃𝑟 ∈ 𝑅 𝑤 = (𝑟 +s 𝐵)} ∪ {𝑡 ∣ ∃𝑠 ∈ 𝑆 𝑡 = (𝐴 +s 𝑠)}) = ({𝑒 ∣ ∃𝑓 ∈ 𝑅 𝑒 = (𝑓 +s 𝐵)} ∪ {𝑔 ∣ ∃ℎ ∈ 𝑆 𝑔 = (𝐴 +s ℎ)})
36	20, 35	oveq12i 7455	. 2 ⊢ (({𝑦 ∣ ∃𝑙 ∈ 𝐿 𝑦 = (𝑙 +s 𝐵)} ∪ {𝑧 ∣ ∃𝑚 ∈ 𝑀 𝑧 = (𝐴 +s 𝑚)}) |s ({𝑤 ∣ ∃𝑟 ∈ 𝑅 𝑤 = (𝑟 +s 𝐵)} ∪ {𝑡 ∣ ∃𝑠 ∈ 𝑆 𝑡 = (𝐴 +s 𝑠)})) = (({𝑎 ∣ ∃𝑏 ∈ 𝐿 𝑎 = (𝑏 +s 𝐵)} ∪ {𝑐 ∣ ∃𝑑 ∈ 𝑀 𝑐 = (𝐴 +s 𝑑)}) |s ({𝑒 ∣ ∃𝑓 ∈ 𝑅 𝑒 = (𝑓 +s 𝐵)} ∪ {𝑔 ∣ ∃ℎ ∈ 𝑆 𝑔 = (𝐴 +s ℎ)}))
37	5, 36	eqtr4di 2816	1 ⊢ (𝜑 → (𝐴 +s 𝐵) = (({𝑦 ∣ ∃𝑙 ∈ 𝐿 𝑦 = (𝑙 +s 𝐵)} ∪ {𝑧 ∣ ∃𝑚 ∈ 𝑀 𝑧 = (𝐴 +s 𝑚)}) |s ({𝑤 ∣ ∃𝑟 ∈ 𝑅 𝑤 = (𝑟 +s 𝐵)} ∪ {𝑡 ∣ ∃𝑠 ∈ 𝑆 𝑡 = (𝐴 +s 𝑠)})))

This proof depends on syntax axioms:   → wi 4   = wceq 1570  {cab 2741  ∃wrex 3090   ∪ cun 4152   class class class wbr 5106  (class class class)co 7443   <<s cslts 28173   |s ccuts 28175   +_s cadds 28375

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-pow 5331  ax-pr 5395  ax-un 7775

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-ot 4862  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-se 5609  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 6322  df-ord 6383  df-on 6384  df-suc 6386  df-iota 6512  df-fun 6560  df-fn 6561  df-f 6562  df-f1 6563  df-fo 6564  df-f1o 6565  df-fv 6566  df-riota 7400  df-ov 7446  df-oprab 7447  df-mpo 7448  df-1st 8025  df-2nd 8026  df-frecs 8327  df-wrecs 8358  df-recs 8407  df-1o 8504  df-2o 8505  df-nadd 8703  df-no 28030  df-lts 28031  df-bday 28032  df-les 28132  df-slts 28174  df-cuts 28176  df-0s 28223  df-made 28243  df-old 28244  df-left 28246  df-right 28247  df-norec2 28365  df-adds 28376

This theorem is used by:  addsasslem1  28419  addsasslem2  28420  negsid  28457  addsdilem2  28568  onaddscl  28693  n0cut  28750  twocut  28839  halfcut  28874  pw2cut2  28878  readdscl  28915