defpred S1[ object ] means $1 in Y;
thus ex Z being set st
for x being object holds
( x in Z iff ( x in X & S1[x] ) ) from XBOOLE_0:sch 1(); :: thesis: verum