reserve
  a,b,c,d,e for Ordinal,
  m,n for Nat,
  f for Ordinal-Sequence,
  x for object;

theorem Th1:
  a c= succ b implies a c= b or a = succ b by ORDINAL1:16,21;
