set A = the non empty Subset of S;
the non empty Subset of S is Subset of S ;
hence not for b1 being Subset of S holds b1 is empty ; :: thesis: verum