theorem Th7:
  X is subset-closed implies subset-closed_closure_of X = X
  by Def1;
