defpred S1[ Subset of ] means $1 is pre-open ;
{ B where B is Subset of : S1[B] } is Subset-Family of from DOMAIN_1:sch 7();
hence { B where B is Subset of : B is pre-open } is Subset-Family of ; :: thesis: verum