let o be object ; for p being pair object st L_ p is surreal-membered & R_ p is surreal-membered holds
( Union (sqrtL (p,o)) is surreal-membered & Union (sqrtR (p,o)) is surreal-membered )
let p be pair object ; ( L_ p is surreal-membered & R_ p is surreal-membered implies ( Union (sqrtL (p,o)) is surreal-membered & Union (sqrtR (p,o)) is surreal-membered ) )
assume A1:
( L_ p is surreal-membered & R_ p is surreal-membered )
; ( Union (sqrtL (p,o)) is surreal-membered & Union (sqrtR (p,o)) is surreal-membered )
thus
Union (sqrtL (p,o)) is surreal-membered
Union (sqrtR (p,o)) is surreal-membered
let a be object ; SURREAL0:def 16 ( not a in Union (sqrtR (p,o)) or a is surreal )
assume
a in Union (sqrtR (p,o))
; a is surreal
then consider n being object such that
A3:
( n in dom (sqrtR (p,o)) & a in (sqrtR (p,o)) . n )
by CARD_5:2;
dom (sqrtR (p,o)) = NAT
by Def5;
then reconsider n = n as Nat by A3;
(sqrtR (p,o)) . n is surreal-membered
by A1, Th9;
hence
a is surreal
by A3; verum