theorem Th19:
  x.|.(-y) = - x.|.y
proof
  x.|.(-y) = (-x).|.y by Th17;
  hence thesis by Th18;
end;
