1 2% The following rule triggered a "non-numeric argument in arithmetic" error 3% in subf1. 4 5frule := { int((~~a+~~b*~x)^~m*~f^((~~c+~~d*x)^~n),x) => 6 (a+b*x)^(m+1)*f^((c+d*x)^n)/(b*(m+1)) 7 - d*n*log(f)/(b*(m+1))*int((a+b*x)^(m+1)*f^((c+d*x)^n)*(c+d*x)^(n-1),x) when fixp n and numberp m and n>1 and m<-1}; 8 9let frule; 10 11clearrules frule; 12 13end; 14 15