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