:: deftheorem Def7 defines omega-y SURREALC:def 7 :
for x being Surreal st not x == 0_No holds
for b2 being uSurreal holds
( b2 = omega-y x iff |.x.|, No_omega^ b2 are_commensurate );