theorem
  union a = a by ORDINAL1:def 6;
