theorem
  Rank succ A = bool Rank A by Lm2;
