theorem
  RealFuncZero(A) <> RealFuncUnit(A)
proof
  set a = the Element of A;
  (RealFuncZero(A)).a=0;
  hence thesis by FUNCOP_1:7;
end;
