theorem Th40:
  x in H implies x in G
proof
  assume
A1: x in H;
  the carrier of H c= the carrier of G by DefA5;
  hence thesis by A1;
end;
