theorem
  f(#)(c1-c2) = f(#)c1 - f(#)c2
  proof
    thus f(#)(c1-c2) = f(#)c1 + f(#)-c2 by Th2
    .= f(#)c1 - f(#)c2 by VALUED_2:24;
  end;
