set f = the adicity of S;
s in LettersOf S by DefLiteral;
then the adicity of S . s in {0} by FUNCT_1:def 7;
hence for b1 being number st b1 = ar s holds
b1 is empty ; :: thesis: verum