
theorem
  for V, W being non empty ModuleStr over INT.Ring, f being FrForm of V,W
  holds (1.F_Real)*f = f
  proof
    let V, W be non empty ModuleStr over INT.Ring, f be FrForm of V,W;
    now
      let v be Vector of V, w be Vector of W;
      thus ((1.F_Real)*f).(v,w) = (1.F_Real) * f.(v,w) by Def3
      .= f.(v,w);
    end;
    hence thesis;
  end;
