:: deftheorem Def7 defines uReal SURREALN:def 7 :
for b1 being ManySortedSet of REAL holds
( b1 = uReal iff for r being Real holds b1 . r = Unique_No (sReal . r) );