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