theorem
  a**(B--C) = a**B--a**C
proof
  thus a**(B--C) = a**B++a**--C by Th208
    .= a**B--a**C by Th94;
end;
