
theorem
  for K be add-associative right_zeroed right_complementable
  right-distributive non empty doubleLoopStr for V,W be non empty ModuleStr
  over K for f be Functional of V holds FormFunctional(f,0Functional(W)) =
  NulForm(V,W)
proof
  let K be add-associative right_zeroed right_complementable
  right-distributive non empty doubleLoopStr;
  let V,W be non empty ModuleStr over K, f be Functional of V;
  now
    let v be Vector of V, y be Vector of W;
    thus FormFunctional(f,0Functional(W)).(v,y) = 0.K by Th20
      .= NulForm(V,W).(v,y) by FUNCOP_1:70;
  end;
  hence thesis;
end;
