theorem
  card RN_Base n = n by Lm5;
