theorem
  {-infty} is bounded_above
proof
  take 0;
  let x;
  assume x in {-infty};
  hence thesis by TARSKI:def 1;
end;
