reserve n   for Nat,
        r,s for Real,
        x,y for Element of REAL n,
        p,q for Point of TOP-REAL n,
        e   for Point of Euclid n;

theorem
  the_set_of_all_right_open_real_bounded_intervals is Semiring of REAL
    by SRINGS_3:10;
