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