theorem
  SF (/\) SG is MSSubsetFamily of M
proof
  SF c= bool M & SG c= bool M by PBOOLE:def 18;
  then SF (/\) SG c= (bool M) (/\) (bool M) by PBOOLE:21;
  hence thesis by PBOOLE:def 18;
end;
