reserve X for set,
  x,y,z for Element of BooleLatt X,
  s for set;

theorem Th2:
  x [= y iff x c= y by XBOOLE_1:7,XBOOLE_1:12;
