reconsider E = NAT --> ({} T) as SetSequence of T ;
E is constant ;
hence ex b1 being SetSequence of T st
( b1 is constant & not b1 is empty ) ; :: thesis: verum