theorem Th37:
  for G being strict Group, H being strict Subgroup of G, a being
  Element of G holds H is maximal & not a in H implies gr(carr H \/ {a}) = G
proof
  let G be strict Group, H be strict Subgroup of G, a be Element of G;
  assume that
A1: H is maximal and
A2: not a in H;
  gr carr H is Subgroup of gr(carr H \/ {a}) by Th32,XBOOLE_1:7;
  then
A3: H is Subgroup of gr(carr H \/ {a}) by Th31;
  a in {a} by TARSKI:def 1;
  then a in carr H \/ {a} by XBOOLE_0:def 3;
  then H <> gr(carr H \/ {a}) by A2,Th29;
  hence thesis by A1,A3;
end;
