theorem Th22:
  X [= Y implies Z \ Y [= Z \ X
proof
  assume X [= Y;
  then Y` [= X` by LATTICES:26;
  hence thesis by LATTICES:9;
end;
