set S = {{}};
set B = the BinOp of {{}};
take ShefferStr(# {{}}, the BinOp of {{}} #) ; :: thesis: ShefferStr(# {{}}, the BinOp of {{}} #) is 1 -element
thus the carrier of ShefferStr(# {{}}, the BinOp of {{}} #) is 1 -element ; :: according to STRUCT_0:def 19 :: thesis: verum