theorem
  for x being Element of X holds 0 <= (max+f).x
proof
  let x be Element of X;
  0. <= (max+(R_EAL f)).x by MESFUNC2:12;
  hence thesis by Th30;
end;
