theorem
  (X "\/" Y)` [= X`
proof
  (X "\/" Y)` = X` "/\" Y` by LATTICES:24;
  hence thesis by LATTICES:6;
end;
