theorem Th16:
  ConstOSSet(R,z) is order-sorted
by Th15;
