theorem
  for G be non empty multMagma, D be non empty Subset of G st
  for x,y being Element of D holds x*y in D
     ex H being strict non empty SubStr of G st the carrier of H = D
       by Lm5;
