Metamath Proof Explorer


Theorem lrold

Description: The union of the left and right options of a surreal make its old set. (Contributed by Scott Fenton, 9-Oct-2024)

Ref Expression
Assertion lrold L A R A = Old bday A

Proof

Step Hyp Ref Expression
1 leftval L A = x Old bday A | x < s A
2 rightval R A = x Old bday A | A < s x
3 1 2 uneq12i L A R A = x Old bday A | x < s A x Old bday A | A < s x
4 unrab x Old bday A | x < s A x Old bday A | A < s x = x Old bday A | x < s A A < s x
5 3 4 eqtri L A R A = x Old bday A | x < s A A < s x
6 oldirr ¬ A Old bday A
7 eleq1 x = A x Old bday A A Old bday A
8 6 7 mtbiri x = A ¬ x Old bday A
9 8 necon2ai x Old bday A x A
10 9 adantl A No x Old bday A x A
11 oldno x Old bday A x No
12 ltstrine x No A No x A x < s A A < s x
13 12 ancoms A No x No x A x < s A A < s x
14 11 13 sylan2 A No x Old bday A x A x < s A A < s x
15 10 14 mpbid A No x Old bday A x < s A A < s x
16 15 rabeqcda A No x Old bday A | x < s A A < s x = Old bday A
17 5 16 eqtrid A No L A R A = Old bday A
18 un0 =
19 leftf L : No 𝒫 No
20 19 fdmi dom L = No
21 20 eleq2i A dom L A No
22 ndmfv ¬ A dom L L A =
23 21 22 sylnbir ¬ A No L A =
24 rightf R : No 𝒫 No
25 24 fdmi dom R = No
26 25 eleq2i A dom R A No
27 ndmfv ¬ A dom R R A =
28 26 27 sylnbir ¬ A No R A =
29 23 28 uneq12d ¬ A No L A R A =
30 bdaydm dom bday = No
31 30 eleq2i A dom bday A No
32 ndmfv ¬ A dom bday bday A =
33 31 32 sylnbir ¬ A No bday A =
34 33 fveq2d ¬ A No Old bday A = Old
35 old0 Old =
36 34 35 eqtrdi ¬ A No Old bday A =
37 18 29 36 3eqtr4a ¬ A No L A R A = Old bday A
38 17 37 pm2.61i L A R A = Old bday A