let x, y be Surreal; for X, Y being set st x == y holds
divset (X,x,Y) <=_ divset (X,y,Y)
let X, Y be set ; ( x == y implies divset (X,x,Y) <=_ divset (X,y,Y) )
assume A1:
x == y
; divset (X,x,Y) <=_ divset (X,y,Y)
let z be Surreal; SURREALO:def 3 ( not z in divset (X,x,Y) or ex b1, b2 being set st
( b1 in divset (X,y,Y) & b2 in divset (X,y,Y) & b1 <= z & z <= b2 ) )
assume
z in divset (X,x,Y)
; ex b1, b2 being set st
( b1 in divset (X,y,Y) & b2 in divset (X,y,Y) & b1 <= z & z <= b2 )
then consider x1, y1 being Surreal such that
A2:
( 0_No < x1 & x1 in X & y1 in Y )
and
A3:
z = (1_No + ((x1 - x) * y1)) * (x1 ")
by Def15;
A4:
(1_No + ((x1 - y) * y1)) * (x1 ") in divset (X,y,Y)
by A2, Def15;
- x == - y
by A1, SURREALR:10;
then
x1 + (- x) == x1 + (- y)
by SURREALR:43;
then
(x1 + (- x)) * y1 == (x1 + (- y)) * y1
by SURREALR:51;
then
1_No + ((x1 + (- x)) * y1) == 1_No + ((x1 + (- y)) * y1)
by SURREALR:43;
then
z == (1_No + ((x1 + (- y)) * y1)) * (x1 ")
by A3, SURREALR:51;
hence
ex b1, b2 being set st
( b1 in divset (X,y,Y) & b2 in divset (X,y,Y) & b1 <= z & z <= b2 )
by A4; verum