theorem Th1:
  A is bounded_below bounded_above
proof
  A is real-bounded by RCOMP_1:10;
  hence thesis;
end;
