
theorem Th52:
  for K be add-associative right_zeroed right_complementable
  distributive non empty doubleLoopStr for V,W be non empty ModuleStr over K
  for f be Functional of V, g be Functional of W holds ker g c= rightker
  FormFunctional(f,g)
proof
  let K be add-associative right_zeroed right_complementable distributive non
empty doubleLoopStr, V, W be non empty ModuleStr over K, f be Functional of V,
  g be Functional of W;
  set fg = FormFunctional(f,g);
A1: ker g = {w where w is Vector of W : g.w = 0.K} by VECTSP10:def 9;
  let x be object;
  assume x in ker g;
  then consider w be Vector of W such that
A2: x=w and
A3: g.w=0.K by A1;
  now
    let v be Vector of V;
    thus fg.(v,w) = f.v*g.w by Def10
      .= 0.K by A3;
  end;
  hence thesis by A2;
end;
