set SS = AllSymbolsOf S;
reconsider C = (AllSymbolsOf S) * as countable set by CARD_4:13;
reconsider IT = C \ {{}} as Subset of C ;
IT is countable ;
hence for b1 being set st b1 = ((AllSymbolsOf S) *) \ {{}} holds
b1 is countable ; :: thesis: verum