theorem
  poly_diff(p-q) = poly_diff(p) - poly_diff(q)
  proof
    thus poly_diff(p-q) = poly_diff(p) + poly_diff(-q) by Th47
    .= poly_diff(p) - poly_diff(q) by Th48;
  end;
