
theorem Th19:
  for R being Skew-Field, s being set st s in the carrier of
  MultGroup R holds s in the carrier of R
proof
  let R be Skew-Field, s be set;
  assume s in the carrier of MultGroup R;
  then s in NonZero R by Def1;
  hence thesis;
end;
