set A = the non-empty ManySortedSet of the carrier of S;
ex B being strict non-empty MSAlgebra over S st
( the Sorts of B = the non-empty ManySortedSet of the carrier of S +* ( the bool-sort of S,BOOLEAN) & B is bool-correct ) by Th46;
hence ex b1 being strict MSAlgebra over S st
( b1 is bool-correct & b1 is non-empty ) ; :: thesis: verum