( <*0*> is natural-valued & not <*0*> is empty ) ;
hence ex b1 being FinSequence st
( not b1 is empty & b1 is natural-valued ) ; :: thesis: verum