reserve A,B for Ordinal,
        o for object,
        x,y,z for Surreal,
        n for Nat,
        r,r1,r2 for Real;

theorem Th8:
  x is positive & x == y implies x,y are_commensurate by Th2,Th5;
