
theorem
  for A,B being non empty Interval holds sup A = inf B &
  (sup A in A or inf B in B) implies A \/ B is Interval
by XXREAL_2:def 5,XXREAL_2:def 6,XXREAL_2:90,XXREAL_2:91;
