consider x being set ;
( not <*x*> is empty & <*x*> is one-to-one ) ;
hence ex b1 being FinSequence st
( b1 is one-to-one & not b1 is empty ) ; :: thesis: verum