let x be object ; :: according to MEMBERED:def 2 :: thesis: ( x in X \/ Y implies x is ext-real )
assume x in X \/ Y ; :: thesis: x is ext-real
then ( x in X or x in Y ) by XBOOLE_0:def 3;
hence x is ext-real ; :: thesis: verum