theorem
  r*mlt(F1,F2) = mlt(r*F1,F2) by RFUNCT_1:12;
