theorem
  0 in M iff 1 c= M
proof 0+1 = 1;
  then nextcard card Segm 0 = card Segm 1 by NAT_1:42;
  hence thesis by CARD_3:90;
end;
