:: deftheorem Def12 defines Rea QUATERNI:def 12 :
for z being Quaternion
for b2 being Number holds
( ( z in COMPLEX implies ( b2 = Rea z iff ex z9 being Complex st
( z = z9 & b2 = Re z9 ) ) ) & ( not z in COMPLEX implies ( b2 = Rea z iff ex f being Function of 4,REAL st
( z = f & b2 = f . 0 ) ) ) );