
theorem
  for V being non empty ModuleStr over INT.Ring, f being FrFunctional of V
  holds (1.F_Real)*f = f
  proof
    let V be non empty ModuleStr over INT.Ring;
    let f be FrFunctional of V;
    now
      let x be Element of V;
      thus ((1.F_Real)*f).x = (1.F_Real)*f.x by HDef6
      .= f.x;
    end;
    hence thesis by FUNCT_2:63;
  end;
