( {1} is Subset of NAT & not 0 in {1} ) ;
hence ex b1 being Subset of NAT st
( not b1 is empty & b1 is without_zero & b1 is finite ) ; :: thesis: verum