theorem Th167:
  a -- (A\+\B) = (a--A) \+\ (a--B)
proof
  thus a -- (A\+\B) = a ++ ((--A)\+\(--B)) by Th18
    .= (a++--A) \+\ (a++--B) by Th151
    .= (a--A) \+\ (a--B);
end;
