defpred S1[ set ] means ex i being Element of NAT st
( i <= 2 |^ n & $1 = i / (2 |^ n) );
ex X being Subset of REAL st
for x being Real holds
( x in X iff S1[x] ) from SUBSET_1:sch 3();
hence ex b1 being Subset of REAL st
for x being Real holds
( x in b1 iff ex i being Element of NAT st
( i <= 2 |^ n & x = i / (2 |^ n) ) ) ; :: thesis: verum