let x, z be Surreal; for r being Sequence of REAL
for y being positive decreasing_infinitely Surreal-Sequence st x in_meets_terms Partial_Sums (r,y),y,r,(dom r) /\ (dom y) & z in_meets_terms Partial_Sums (r,y),y,r,(dom r) /\ (dom y) & not x == z holds
for A being Ordinal
for yA being Surreal st A in (dom r) /\ (dom y) & yA = y . A holds
No_omega^ (omega-y (x - z)) < yA
let r be Sequence of REAL ; for y being positive decreasing_infinitely Surreal-Sequence st x in_meets_terms Partial_Sums (r,y),y,r,(dom r) /\ (dom y) & z in_meets_terms Partial_Sums (r,y),y,r,(dom r) /\ (dom y) & not x == z holds
for A being Ordinal
for yA being Surreal st A in (dom r) /\ (dom y) & yA = y . A holds
No_omega^ (omega-y (x - z)) < yA
let y be positive decreasing_infinitely Surreal-Sequence; ( x in_meets_terms Partial_Sums (r,y),y,r,(dom r) /\ (dom y) & z in_meets_terms Partial_Sums (r,y),y,r,(dom r) /\ (dom y) & not x == z implies for A being Ordinal
for yA being Surreal st A in (dom r) /\ (dom y) & yA = y . A holds
No_omega^ (omega-y (x - z)) < yA )
set s = Partial_Sums (r,y);
set D = (dom r) /\ (dom y);
assume that
A1:
( x in_meets_terms Partial_Sums (r,y),y,r,(dom r) /\ (dom y) & z in_meets_terms Partial_Sums (r,y),y,r,(dom r) /\ (dom y) )
and
A2:
not x == z
; for A being Ordinal
for yA being Surreal st A in (dom r) /\ (dom y) & yA = y . A holds
No_omega^ (omega-y (x - z)) < yA
let A be Ordinal; for yA being Surreal st A in (dom r) /\ (dom y) & yA = y . A holds
No_omega^ (omega-y (x - z)) < yA
let yA be Surreal; ( A in (dom r) /\ (dom y) & yA = y . A implies No_omega^ (omega-y (x - z)) < yA )
assume A3:
( A in (dom r) /\ (dom y) & yA = y . A )
; No_omega^ (omega-y (x - z)) < yA
A4:
not x - z == 0_No
by SURREALR:47, A2;
dom (Partial_Sums (r,y)) = succ ((dom r) /\ (dom y))
by Def20;
then A5:
|.(x - z).| infinitely< yA
by XBOOLE_1:7, A3, A1, Th93;
|.(x - z).|, No_omega^ (omega-y (x + (- z))) are_commensurate
by A4, Def7;
hence
No_omega^ (omega-y (x - z)) < yA
by Th9, A5, Th15; verum