reserve a,b for R_eal;
reserve A,B for Interval;

theorem
  A c= B implies diameter A <= diameter B by Lm2;
