scheme :: TOPREAL1:sch 2
TRSubsetEx{ F1() -> Nat, P1[ object ] } :
ex A being Subset of (TOP-REAL F1()) st
for p being Point of (TOP-REAL F1()) holds
( p in A iff P1[p] )