theorem Th40:
  for X being finite set st not x in X holds card (X \/ {x}) = card X + 1
proof
  let X be finite set;
A1: card {x} = 1 by CARD_1:30;
  assume not x in X;
  hence thesis by A1,Th39,ZFMISC_1:50;
end;
