reserve i,j for Nat;

theorem
  for A being Matrix of REAL holds 1*A=A
proof
  let A be Matrix of REAL;
  1*A = MXF2MXR ((1_F_Real)*(MXR2MXF A)) by Def7;
  hence thesis by MATRIX_5:9;
end;
