MSAlgebra(# the Sorts of U0, the Charact of U0 #) is MSSubAlgebra of U0 by Lm1;
hence ex b1 being MSSubAlgebra of U0 st
( b1 is non-empty & b1 is strict ) ; :: thesis: verum