take REAL ; :: thesis: for b1 being Real holds b1 in REAL
thus for b1 being Real holds b1 in REAL by Def1; :: thesis: verum