theorem
  StoneH(H) preserves_implication
by Th33;
