theorem Th5:
  for f being LModMorphismStr over R holds dom(f) = G & cod(f) = H
  & fun(f) is additive homogeneous implies f is Morphism of G,H
proof
  let f be LModMorphismStr over R;
  assume that
A1: dom(f) = G & cod(f) = H and
A2: fun(f) is additive homogeneous;
  reconsider f9 = f as LModMorphism of R by A2,Def7;
  f9 is Morphism of G,H by A1,Def8;
  hence thesis;
end;
