reserve U for Universe;
reserve x for Element of U;
reserve U1,U2 for Universe;

theorem Th64:
  ex C being U-petit Category st
  the carrier of C is Element of U & not the carrier' of C is Element of U
  proof
    reconsider o = {} as Element of U by CLASSES2:56;
    consider m be set such that
A1: not m in U by CLASSES4:83;
    set C = 1Cat(o, m);
    now
      thus C is U-petit by Th61;
      C = CatStr(# { o },{ m},  m:-> o,m:->o,(m,m):->m #) by CAT_1:def 11;
      hence not the carrier' of C is Element of U &
      the carrier of C is Element of U by A1,Th18;
    end;
    hence thesis;
  end;
