reserve x,y,z,r,s for ExtReal;
reserve A,B for ext-real-membered set;
reserve A,B for ext-real-membered set;

theorem Th82:
  A is interval implies for x,r st x in A & inf A < r & r <= x holds r in A
proof
  assume
A1: A is interval;
  let x,r such that
A2: x in A and
A3: inf A < r and
A4: r <= x;
  per cases;
  suppose
    ex y st y in A & r > y;
    hence thesis by A1,A2,A4,Th80;
  end;
  suppose
    not ex y st y in A & r > y;
    then r is LowerBound of A by Def2;
    hence thesis by A3,Def4;
  end;
end;
