reserve D,D9 for non empty set;
reserve R for Ring;
reserve G,H,S for non empty ModuleStr over R;
reserve UN for Universe;
reserve R for Ring;
reserve G, H for LeftMod of R;
reserve G1, G2, G3 for LeftMod of R;
reserve f for LModMorphismStr over R;

theorem Th9:
  for F being LModMorphism of R ex G,H st F is Morphism of G,H
proof
  let F be LModMorphism of R;
  take G = the Dom of F,H = the Cod of F;
  dom(F) = G & cod(F) = H;
  hence thesis by Def8;
end;
