let x be set ; :: according to MEMBERED:def 3 :: thesis: ( x in REAL implies x is real )
thus ( x in REAL implies x is real ) by XREAL_0:def 1; :: thesis: verum