:: deftheorem Def10 defines -' SURREALR:def 10 :
for x being object st x is surreal holds
for b2 being Surreal holds
( b2 = -' x iff for x1 being Surreal st x1 = x holds
b2 = - x1 );