theorem
  e in p,tr & e1 < e & e < e2 implies e in (e1,e2) interval_in (p,tr);
