reserve x for set;
reserve a,b,c,d for ExtReal;

theorem
  max(b,c) <= a implies b <= a
proof
  b <= max(b,c) by Th25;
  hence thesis by Th2;
end;
