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