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

theorem
  a <= min(a,b) implies min(a,b) = a
proof
  assume min(a,b) >= a;
  then min(a,b) > a or min(a,b) = a by Th1;
  hence thesis by Th17;
end;
