let x, y be Surreal; :: thesis: for X1, X2, Y1, Y2 being set st X1 <==> X2 & Y1 <==> Y2 & x = [X1,Y1] & y = [X2,Y2] holds
x == y

let X1, X2, Y1, Y2 be set ; :: thesis: ( X1 <==> X2 & Y1 <==> Y2 & x = [X1,Y1] & y = [X2,Y2] implies x == y )
assume A1: ( X1 <==> X2 & Y1 <==> Y2 & x = [X1,Y1] & y = [X2,Y2] ) ; :: thesis: x == y
A2: now :: thesis: for x being Surreal st x in X1 holds
ex y being Surreal st
( y in X2 & x <= y )
let x be Surreal; :: thesis: ( x in X1 implies ex y being Surreal st
( y in X2 & x <= y ) )

assume x in X1 ; :: thesis: ex y being Surreal st
( y in X2 & x <= y )

then ex y1, y2 being Surreal st
( y1 in X2 & y2 in X2 & y1 <= x & x <= y2 ) by A1, Def3;
hence ex y being Surreal st
( y in X2 & x <= y ) ; :: thesis: verum
end;
A3: now :: thesis: for x being Surreal st x in Y2 holds
ex y being Surreal st
( y in Y1 & y <= x )
let x be Surreal; :: thesis: ( x in Y2 implies ex y being Surreal st
( y in Y1 & y <= x ) )

assume x in Y2 ; :: thesis: ex y being Surreal st
( y in Y1 & y <= x )

then ex y1, y2 being Surreal st
( y1 in Y1 & y2 in Y1 & y1 <= x & x <= y2 ) by A1, Def3;
hence ex y being Surreal st
( y in Y1 & y <= x ) ; :: thesis: verum
end;
A4: now :: thesis: for x being Surreal st x in X2 holds
ex y being Surreal st
( y in X1 & x <= y )
let x be Surreal; :: thesis: ( x in X2 implies ex y being Surreal st
( y in X1 & x <= y ) )

assume x in X2 ; :: thesis: ex y being Surreal st
( y in X1 & x <= y )

then ex y1, y2 being Surreal st
( y1 in X1 & y2 in X1 & y1 <= x & x <= y2 ) by A1, Def3;
hence ex y being Surreal st
( y in X1 & x <= y ) ; :: thesis: verum
end;
now :: thesis: for x being Surreal st x in Y1 holds
ex y being Surreal st
( y in Y2 & y <= x )
let x be Surreal; :: thesis: ( x in Y1 implies ex y being Surreal st
( y in Y2 & y <= x ) )

assume x in Y1 ; :: thesis: ex y being Surreal st
( y in Y2 & y <= x )

then ex y1, y2 being Surreal st
( y1 in Y2 & y2 in Y2 & y1 <= x & x <= y2 ) by A1, Def3;
hence ex y being Surreal st
( y in Y2 & y <= x ) ; :: thesis: verum
end;
hence x == y by SURREAL0:44, A1, A2, A3, A4; :: thesis: verum