reserve T for non empty TopSpace;
reserve A for Subset of T;

theorem
  card Kurat14Set KurExSet = 14
proof
  set A = KurExSet;
  set B = { A, A` };
A1: B misses (Kurat14ClPart A \/ Kurat14OpPart A) by Th61,Th63,XBOOLE_1:70;
A2: card (Kurat14ClPart A \/ Kurat14OpPart A) = 6 + 6 by Th57,Th59,Th60,
CARD_2:40
    .= 12;
  card Kurat14Set A = card (B \/ Kurat14ClPart A \/ Kurat14OpPart A) by Lm2
    .= card (B \/ (Kurat14ClPart A \/ Kurat14OpPart A)) by XBOOLE_1:4
    .= card B + card (Kurat14ClPart A \/ Kurat14OpPart A) by A1,CARD_2:40
    .= 2 + 12 by A2,Th62,CARD_2:57
    .= 14;
  hence thesis;
end;
