theorem
  X c= succ X by XBOOLE_1:7;
