theorem Th30:
  Subformulae VERUM = root-tree VERUM by Def9;
