theorem Th18:
  f c= h & g c= h implies max(f,g) c= h
proof
  assume
A1: f c= h & g c= h;
  let x be Element of C;
A2: max(f.x,g.x) = max(f,g).x by Def4;
  f.x <= h.x & g.x <= h.x by A1;
  hence thesis by A2,XXREAL_0:28;
end;
