theorem
  A c= bool union A
proof
  let x;
   reconsider xx=x as set by TARSKI:1;
  assume x in A;
  then xx c= union A by Lm14;
  hence thesis by Def1;
end;
