
theorem Th9:
  for A being set holds TWOELEMENTSETS(A) c= bool A
proof
  let A be set;
  let x be object;
  assume x in TWOELEMENTSETS(A);
  then x is finite Subset of A by Th8;
  hence x in bool A;
end;
