lst:=[[(b*coth(d*x+c))^(7/2),x,7,b^(7/2)*arctan(sqrt(b*coth(d*x+c))/sqrt(b))/d+b^(7/2)*arctanh(sqrt(b*coth(d*x+c))/sqrt(b))/d-2*b^3*sqrt(b*coth(d*x+c))/d-2/5*b*(b*coth(d*x+c))^(5/2)/d,1],
[(b*coth(d*x+c))^(5/2),x,6,-b^(5/2)*arctan(sqrt(b*coth(d*x+c))/sqrt(b))/d+b^(5/2)*arctanh(sqrt(b*coth(d*x+c))/sqrt(b))/d-2/3*b*(b*coth(d*x+c))^(3/2)/d,1],
[(b*coth(d*x+c))^(3/2),x,6,b^(3/2)*arctan(sqrt(b*coth(d*x+c))/sqrt(b))/d+b^(3/2)*arctanh(sqrt(b*coth(d*x+c))/sqrt(b))/d-2*b*sqrt(b*coth(d*x+c))/d,1],
[sqrt(b*coth(d*x+c)),x,5,-sqrt(b)*arctan(sqrt(b*coth(d*x+c))/sqrt(b))/d+sqrt(b)*arctanh(sqrt(b*coth(d*x+c))/sqrt(b))/d,1],
[1/sqrt(b*coth(d*x+c)),x,5,arctan(sqrt(b*coth(d*x+c))/sqrt(b))/sqrt(b)/d+arctanh(sqrt(b*coth(d*x+c))/sqrt(b))/sqrt(b)/d,1],
[1/(b*coth(d*x+c))^(3/2),x,6,-arctan(sqrt(b*coth(d*x+c))/sqrt(b))/b^(3/2)/d+arctanh(sqrt(b*coth(d*x+c))/sqrt(b))/b^(3/2)/d-2/b/d/sqrt(b*coth(d*x+c)),1],
[1/(b*coth(d*x+c))^(5/2),x,6,arctan(sqrt(b*coth(d*x+c))/sqrt(b))/b^(5/2)/d+arctanh(sqrt(b*coth(d*x+c))/sqrt(b))/b^(5/2)/d-2/3/b/d/(b*coth(d*x+c))^(3/2),1],
[1/(b*coth(d*x+c))^(7/2),x,7,-arctan(sqrt(b*coth(d*x+c))/sqrt(b))/b^(7/2)/d+arctanh(sqrt(b*coth(d*x+c))/sqrt(b))/b^(7/2)/d-2/5/b/d/(b*coth(d*x+c))^(5/2)-2/b^3/d/sqrt(b*coth(d*x+c)),1],
[(b*coth(d*x+c))^(4/3),x,13,-1/2*sqrt(3)*b^(4/3)*arctan((b^(1/3)-2*(b*coth(d*x+c))^(1/3))/sqrt(3)/b^(1/3))/d+1/2*sqrt(3)*b^(4/3)*arctan((b^(1/3)+2*(b*coth(d*x+c))^(1/3))/sqrt(3)/b^(1/3))/d+b^(4/3)*arctanh((b*coth(d*x+c))^(1/3)/b^(1/3))/d+1/2*b^(4/3)*arctanh(b^(1/3)*(b*coth(d*x+c))^(1/3)/(b^(2/3)+(b*coth(d*x+c))^(2/3)))/d-3*b*(b*coth(d*x+c))^(1/3)/d,1],
[(b*coth(d*x+c))^(2/3),x,12,1/2*sqrt(3)*b^(2/3)*arctan((b^(1/3)-2*(b*coth(d*x+c))^(1/3))/sqrt(3)/b^(1/3))/d-1/2*sqrt(3)*b^(2/3)*arctan((b^(1/3)+2*(b*coth(d*x+c))^(1/3))/sqrt(3)/b^(1/3))/d+b^(2/3)*arctanh((b*coth(d*x+c))^(1/3)/b^(1/3))/d+1/2*b^(2/3)*arctanh(b^(1/3)*(b*coth(d*x+c))^(1/3)/(b^(2/3)+(b*coth(d*x+c))^(2/3)))/d,1],
[(b*coth(d*x+c))^(1/3),x,9,-1/2*sqrt(3)*b^(1/3)*arctan((b^(2/3)+2*(b*coth(d*x+c))^(2/3))/sqrt(3)/b^(2/3))/d-1/2*b^(1/3)*ln(b^(2/3)-(b*coth(d*x+c))^(2/3))/d+1/4*b^(1/3)*ln(b^(4/3)+b^(2/3)*(b*coth(d*x+c))^(2/3)+(b*coth(d*x+c))^(4/3))/d,1],
[1/(b*coth(d*x+c))^(1/3),x,9,1/2*sqrt(3)*arctan((b^(2/3)+2*(b*coth(d*x+c))^(2/3))/sqrt(3)/b^(2/3))/b^(1/3)/d-1/2*ln(b^(2/3)-(b*coth(d*x+c))^(2/3))/b^(1/3)/d+1/4*ln(b^(4/3)+b^(2/3)*(b*coth(d*x+c))^(2/3)+(b*coth(d*x+c))^(4/3))/b^(1/3)/d,1],
[1/(b*coth(d*x+c))^(2/3),x,12,-1/2*sqrt(3)*arctan((b^(1/3)-2*(b*coth(d*x+c))^(1/3))/sqrt(3)/b^(1/3))/b^(2/3)/d+1/2*sqrt(3)*arctan((b^(1/3)+2*(b*coth(d*x+c))^(1/3))/sqrt(3)/b^(1/3))/b^(2/3)/d+arctanh((b*coth(d*x+c))^(1/3)/b^(1/3))/b^(2/3)/d+1/2*arctanh(b^(1/3)*(b*coth(d*x+c))^(1/3)/(b^(2/3)+(b*coth(d*x+c))^(2/3)))/b^(2/3)/d,1],
[1/(b*coth(d*x+c))^(4/3),x,13,1/2*sqrt(3)*arctan((b^(1/3)-2*(b*coth(d*x+c))^(1/3))/sqrt(3)/b^(1/3))/b^(4/3)/d-1/2*sqrt(3)*arctan((b^(1/3)+2*(b*coth(d*x+c))^(1/3))/sqrt(3)/b^(1/3))/b^(4/3)/d+arctanh((b*coth(d*x+c))^(1/3)/b^(1/3))/b^(4/3)/d+1/2*arctanh(b^(1/3)*(b*coth(d*x+c))^(1/3)/(b^(2/3)+(b*coth(d*x+c))^(2/3)))/b^(4/3)/d-3/b/d/(b*coth(d*x+c))^(1/3),1],
[coth(b*x+a)^n,x,2,coth(b*x+a)^(1+n)*hypergeom([1, 1/2+1/2*n],[3/2+1/2*n],coth(b*x+a)^2)/b/(1+n),1],
[(b*coth(d*x+c))^n,x,2,(b*coth(d*x+c))^(1+n)*hypergeom([1, 1/2+1/2*n],[3/2+1/2*n],coth(d*x+c)^2)/b/d/(1+n),1],
[(b*coth(d*x+c)^2)^n,x,3,coth(d*x+c)*(b*coth(d*x+c)^2)^n*hypergeom([1, 1/2+n],[3/2+n],coth(d*x+c)^2)/d/(1+2*n),1],
[(b*coth(d*x+c)^2)^(3/2),x,3,-1/2*b*coth(d*x+c)*sqrt(b*coth(d*x+c)^2)/d+b*sqrt(b*coth(d*x+c)^2)*ln(sinh(d*x+c))*tanh(d*x+c)/d,1],
[sqrt(b*coth(d*x+c)^2),x,2,sqrt(b*coth(d*x+c)^2)*ln(sinh(d*x+c))*tanh(d*x+c)/d,1],
[1/sqrt(b*coth(d*x+c)^2),x,2,coth(d*x+c)*ln(cosh(d*x+c))/d/sqrt(b*coth(d*x+c)^2),1],
[1/(b*coth(d*x+c)^2)^(3/2),x,3,coth(d*x+c)*ln(cosh(d*x+c))/b/d/sqrt(b*coth(d*x+c)^2)-1/2*tanh(d*x+c)/b/d/sqrt(b*coth(d*x+c)^2),1],
[(b*coth(d*x+c)^2)^(4/3),x,14,1/2*sqrt(3)*b*arctan((1-2*coth(d*x+c)^(1/3))/sqrt(3))*(b*coth(d*x+c)^2)^(1/3)/d/coth(d*x+c)^(2/3)-1/2*sqrt(3)*b*arctan((1+2*coth(d*x+c)^(1/3))/sqrt(3))*(b*coth(d*x+c)^2)^(1/3)/d/coth(d*x+c)^(2/3)+b*arctanh(coth(d*x+c)^(1/3))*(b*coth(d*x+c)^2)^(1/3)/d/coth(d*x+c)^(2/3)+1/2*b*arctanh(coth(d*x+c)^(1/3)/(1+coth(d*x+c)^(2/3)))*(b*coth(d*x+c)^2)^(1/3)/d/coth(d*x+c)^(2/3)-3/5*b*coth(d*x+c)*(b*coth(d*x+c)^2)^(1/3)/d,1],
[(b*coth(d*x+c)^2)^(2/3),x,14,-1/2*sqrt(3)*arctan((1-2*coth(d*x+c)^(1/3))/sqrt(3))*(b*coth(d*x+c)^2)^(2/3)/d/coth(d*x+c)^(4/3)+1/2*sqrt(3)*arctan((1+2*coth(d*x+c)^(1/3))/sqrt(3))*(b*coth(d*x+c)^2)^(2/3)/d/coth(d*x+c)^(4/3)+arctanh(coth(d*x+c)^(1/3))*(b*coth(d*x+c)^2)^(2/3)/d/coth(d*x+c)^(4/3)+1/2*arctanh(coth(d*x+c)^(1/3)/(1+coth(d*x+c)^(2/3)))*(b*coth(d*x+c)^2)^(2/3)/d/coth(d*x+c)^(4/3)-3*(b*coth(d*x+c)^2)^(2/3)*tanh(d*x+c)/d,1],
[(b*coth(d*x+c)^2)^(1/3),x,13,1/2*sqrt(3)*arctan((1-2*coth(d*x+c)^(1/3))/sqrt(3))*(b*coth(d*x+c)^2)^(1/3)/d/coth(d*x+c)^(2/3)-1/2*sqrt(3)*arctan((1+2*coth(d*x+c)^(1/3))/sqrt(3))*(b*coth(d*x+c)^2)^(1/3)/d/coth(d*x+c)^(2/3)+arctanh(coth(d*x+c)^(1/3))*(b*coth(d*x+c)^2)^(1/3)/d/coth(d*x+c)^(2/3)+1/2*arctanh(coth(d*x+c)^(1/3)/(1+coth(d*x+c)^(2/3)))*(b*coth(d*x+c)^2)^(1/3)/d/coth(d*x+c)^(2/3),1],
[1/(b*coth(d*x+c)^2)^(1/3),x,13,-1/2*sqrt(3)*arctan((1-2*coth(d*x+c)^(1/3))/sqrt(3))*coth(d*x+c)^(2/3)/d/(b*coth(d*x+c)^2)^(1/3)+1/2*sqrt(3)*arctan((1+2*coth(d*x+c)^(1/3))/sqrt(3))*coth(d*x+c)^(2/3)/d/(b*coth(d*x+c)^2)^(1/3)+arctanh(coth(d*x+c)^(1/3))*coth(d*x+c)^(2/3)/d/(b*coth(d*x+c)^2)^(1/3)+1/2*arctanh(coth(d*x+c)^(1/3)/(1+coth(d*x+c)^(2/3)))*coth(d*x+c)^(2/3)/d/(b*coth(d*x+c)^2)^(1/3),1],
[1/(b*coth(d*x+c)^2)^(2/3),x,14,-3*coth(d*x+c)/d/(b*coth(d*x+c)^2)^(2/3)+1/2*sqrt(3)*arctan((1-2*coth(d*x+c)^(1/3))/sqrt(3))*coth(d*x+c)^(4/3)/d/(b*coth(d*x+c)^2)^(2/3)-1/2*sqrt(3)*arctan((1+2*coth(d*x+c)^(1/3))/sqrt(3))*coth(d*x+c)^(4/3)/d/(b*coth(d*x+c)^2)^(2/3)+arctanh(coth(d*x+c)^(1/3))*coth(d*x+c)^(4/3)/d/(b*coth(d*x+c)^2)^(2/3)+1/2*arctanh(coth(d*x+c)^(1/3)/(1+coth(d*x+c)^(2/3)))*coth(d*x+c)^(4/3)/d/(b*coth(d*x+c)^2)^(2/3),1],
[1/(b*coth(d*x+c)^2)^(4/3),x,14,-1/2*sqrt(3)*arctan((1-2*coth(d*x+c)^(1/3))/sqrt(3))*coth(d*x+c)^(2/3)/b/d/(b*coth(d*x+c)^2)^(1/3)+1/2*sqrt(3)*arctan((1+2*coth(d*x+c)^(1/3))/sqrt(3))*coth(d*x+c)^(2/3)/b/d/(b*coth(d*x+c)^2)^(1/3)+arctanh(coth(d*x+c)^(1/3))*coth(d*x+c)^(2/3)/b/d/(b*coth(d*x+c)^2)^(1/3)+1/2*arctanh(coth(d*x+c)^(1/3)/(1+coth(d*x+c)^(2/3)))*coth(d*x+c)^(2/3)/b/d/(b*coth(d*x+c)^2)^(1/3)-3/5*tanh(d*x+c)/b/d/(b*coth(d*x+c)^2)^(1/3),1],
[(b*coth(d*x+c)^3)^n,x,3,coth(d*x+c)*(b*coth(d*x+c)^3)^n*hypergeom([1, 1/2+3/2*n],[3/2+3/2*n],coth(d*x+c)^2)/d/(1+3*n),1],
[(b*coth(d*x+c)^3)^(3/2),x,8,-2/3*b*sqrt(b*coth(d*x+c)^3)/d-b*arctan(sqrt(coth(d*x+c)))*sqrt(b*coth(d*x+c)^3)/d/coth(d*x+c)^(3/2)+b*arctanh(sqrt(coth(d*x+c)))*sqrt(b*coth(d*x+c)^3)/d/coth(d*x+c)^(3/2)-2/7*b*coth(d*x+c)^2*sqrt(b*coth(d*x+c)^3)/d,1],
[sqrt(b*coth(d*x+c)^3),x,7,arctan(sqrt(coth(d*x+c)))*sqrt(b*coth(d*x+c)^3)/d/coth(d*x+c)^(3/2)+arctanh(sqrt(coth(d*x+c)))*sqrt(b*coth(d*x+c)^3)/d/coth(d*x+c)^(3/2)-2*sqrt(b*coth(d*x+c)^3)*tanh(d*x+c)/d,1],
[1/sqrt(b*coth(d*x+c)^3),x,7,-2*coth(d*x+c)/d/sqrt(b*coth(d*x+c)^3)-arctan(sqrt(coth(d*x+c)))*coth(d*x+c)^(3/2)/d/sqrt(b*coth(d*x+c)^3)+arctanh(sqrt(coth(d*x+c)))*coth(d*x+c)^(3/2)/d/sqrt(b*coth(d*x+c)^3),1],
[1/(b*coth(d*x+c)^3)^(3/2),x,8,-2/3/b/d/sqrt(b*coth(d*x+c)^3)+arctan(sqrt(coth(d*x+c)))*coth(d*x+c)^(3/2)/b/d/sqrt(b*coth(d*x+c)^3)+arctanh(sqrt(coth(d*x+c)))*coth(d*x+c)^(3/2)/b/d/sqrt(b*coth(d*x+c)^3)-2/7*tanh(d*x+c)^2/b/d/sqrt(b*coth(d*x+c)^3),1],
[(b*coth(d*x+c)^3)^(4/3),x,4,-b*(b*coth(d*x+c)^3)^(1/3)/d-1/3*b*coth(d*x+c)^2*(b*coth(d*x+c)^3)^(1/3)/d+b*x*(b*coth(d*x+c)^3)^(1/3)*tanh(d*x+c),1],
[(b*coth(d*x+c)^3)^(2/3),x,3,-(b*coth(d*x+c)^3)^(2/3)*tanh(d*x+c)/d+x*(b*coth(d*x+c)^3)^(2/3)*tanh(d*x+c)^2,1],
[(b*coth(d*x+c)^3)^(1/3),x,2,(b*coth(d*x+c)^3)^(1/3)*ln(sinh(d*x+c))*tanh(d*x+c)/d,1],
[1/(b*coth(d*x+c)^3)^(1/3),x,2,coth(d*x+c)*ln(cosh(d*x+c))/d/(b*coth(d*x+c)^3)^(1/3),1],
[1/(b*coth(d*x+c)^3)^(2/3),x,3,-coth(d*x+c)/d/(b*coth(d*x+c)^3)^(2/3)+x*coth(d*x+c)^2/(b*coth(d*x+c)^3)^(2/3),1],
[1/(b*coth(d*x+c)^3)^(4/3),x,4,-1/b/d/(b*coth(d*x+c)^3)^(1/3)+x*coth(d*x+c)/b/(b*coth(d*x+c)^3)^(1/3)-1/3*tanh(d*x+c)^2/b/d/(b*coth(d*x+c)^3)^(1/3),1],
[(b*coth(d*x+c)^4)^n,x,3,coth(d*x+c)*(b*coth(d*x+c)^4)^n*hypergeom([1, 1/2+2*n],[3/2+2*n],coth(d*x+c)^2)/d/(1+4*n),1],
[(b*coth(d*x+c)^4)^(3/2),x,5,-1/3*b*coth(d*x+c)*sqrt(b*coth(d*x+c)^4)/d-1/5*b*coth(d*x+c)^3*sqrt(b*coth(d*x+c)^4)/d-b*sqrt(b*coth(d*x+c)^4)*tanh(d*x+c)/d+b*x*sqrt(b*coth(d*x+c)^4)*tanh(d*x+c)^2,1],
[sqrt(b*coth(d*x+c)^4),x,3,-sqrt(b*coth(d*x+c)^4)*tanh(d*x+c)/d+x*sqrt(b*coth(d*x+c)^4)*tanh(d*x+c)^2,1],
[1/sqrt(b*coth(d*x+c)^4),x,3,-coth(d*x+c)/d/sqrt(b*coth(d*x+c)^4)+x*coth(d*x+c)^2/sqrt(b*coth(d*x+c)^4),1],
[1/(b*coth(d*x+c)^4)^(3/2),x,5,-coth(d*x+c)/b/d/sqrt(b*coth(d*x+c)^4)+x*coth(d*x+c)^2/b/sqrt(b*coth(d*x+c)^4)-1/3*tanh(d*x+c)/b/d/sqrt(b*coth(d*x+c)^4)-1/5*tanh(d*x+c)^3/b/d/sqrt(b*coth(d*x+c)^4),1],
[(b*coth(d*x+c)^4)^(4/3),x,16,-1/2*sqrt(3)*b*arctan((1-2*coth(d*x+c)^(1/3))/sqrt(3))*(b*coth(d*x+c)^4)^(1/3)/d/coth(d*x+c)^(4/3)+1/2*sqrt(3)*b*arctan((1+2*coth(d*x+c)^(1/3))/sqrt(3))*(b*coth(d*x+c)^4)^(1/3)/d/coth(d*x+c)^(4/3)+b*arctanh(coth(d*x+c)^(1/3))*(b*coth(d*x+c)^4)^(1/3)/d/coth(d*x+c)^(4/3)+1/2*b*arctanh(coth(d*x+c)^(1/3)/(1+coth(d*x+c)^(2/3)))*(b*coth(d*x+c)^4)^(1/3)/d/coth(d*x+c)^(4/3)-3/7*b*coth(d*x+c)*(b*coth(d*x+c)^4)^(1/3)/d-3/13*b*coth(d*x+c)^3*(b*coth(d*x+c)^4)^(1/3)/d-3*b*(b*coth(d*x+c)^4)^(1/3)*tanh(d*x+c)/d,1],
[(b*coth(d*x+c)^4)^(2/3),x,14,1/2*sqrt(3)*arctan((1-2*coth(d*x+c)^(1/3))/sqrt(3))*(b*coth(d*x+c)^4)^(2/3)/d/coth(d*x+c)^(8/3)-1/2*sqrt(3)*arctan((1+2*coth(d*x+c)^(1/3))/sqrt(3))*(b*coth(d*x+c)^4)^(2/3)/d/coth(d*x+c)^(8/3)+arctanh(coth(d*x+c)^(1/3))*(b*coth(d*x+c)^4)^(2/3)/d/coth(d*x+c)^(8/3)+1/2*arctanh(coth(d*x+c)^(1/3)/(1+coth(d*x+c)^(2/3)))*(b*coth(d*x+c)^4)^(2/3)/d/coth(d*x+c)^(8/3)-3/5*(b*coth(d*x+c)^4)^(2/3)*tanh(d*x+c)/d,1],
[(b*coth(d*x+c)^4)^(1/3),x,14,-1/2*sqrt(3)*arctan((1-2*coth(d*x+c)^(1/3))/sqrt(3))*(b*coth(d*x+c)^4)^(1/3)/d/coth(d*x+c)^(4/3)+1/2*sqrt(3)*arctan((1+2*coth(d*x+c)^(1/3))/sqrt(3))*(b*coth(d*x+c)^4)^(1/3)/d/coth(d*x+c)^(4/3)+arctanh(coth(d*x+c)^(1/3))*(b*coth(d*x+c)^4)^(1/3)/d/coth(d*x+c)^(4/3)+1/2*arctanh(coth(d*x+c)^(1/3)/(1+coth(d*x+c)^(2/3)))*(b*coth(d*x+c)^4)^(1/3)/d/coth(d*x+c)^(4/3)-3*(b*coth(d*x+c)^4)^(1/3)*tanh(d*x+c)/d,1],
[1/(b*coth(d*x+c)^4)^(1/3),x,14,-3*coth(d*x+c)/d/(b*coth(d*x+c)^4)^(1/3)+1/2*sqrt(3)*arctan((1-2*coth(d*x+c)^(1/3))/sqrt(3))*coth(d*x+c)^(4/3)/d/(b*coth(d*x+c)^4)^(1/3)-1/2*sqrt(3)*arctan((1+2*coth(d*x+c)^(1/3))/sqrt(3))*coth(d*x+c)^(4/3)/d/(b*coth(d*x+c)^4)^(1/3)+arctanh(coth(d*x+c)^(1/3))*coth(d*x+c)^(4/3)/d/(b*coth(d*x+c)^4)^(1/3)+1/2*arctanh(coth(d*x+c)^(1/3)/(1+coth(d*x+c)^(2/3)))*coth(d*x+c)^(4/3)/d/(b*coth(d*x+c)^4)^(1/3),1],
[1/(b*coth(d*x+c)^4)^(2/3),x,14,-3/5*coth(d*x+c)/d/(b*coth(d*x+c)^4)^(2/3)-1/2*sqrt(3)*arctan((1-2*coth(d*x+c)^(1/3))/sqrt(3))*coth(d*x+c)^(8/3)/d/(b*coth(d*x+c)^4)^(2/3)+1/2*sqrt(3)*arctan((1+2*coth(d*x+c)^(1/3))/sqrt(3))*coth(d*x+c)^(8/3)/d/(b*coth(d*x+c)^4)^(2/3)+arctanh(coth(d*x+c)^(1/3))*coth(d*x+c)^(8/3)/d/(b*coth(d*x+c)^4)^(2/3)+1/2*arctanh(coth(d*x+c)^(1/3)/(1+coth(d*x+c)^(2/3)))*coth(d*x+c)^(8/3)/d/(b*coth(d*x+c)^4)^(2/3),1],
[1/(b*coth(d*x+c)^4)^(4/3),x,16,-3*coth(d*x+c)/b/d/(b*coth(d*x+c)^4)^(1/3)+1/2*sqrt(3)*arctan((1-2*coth(d*x+c)^(1/3))/sqrt(3))*coth(d*x+c)^(4/3)/b/d/(b*coth(d*x+c)^4)^(1/3)-1/2*sqrt(3)*arctan((1+2*coth(d*x+c)^(1/3))/sqrt(3))*coth(d*x+c)^(4/3)/b/d/(b*coth(d*x+c)^4)^(1/3)+arctanh(coth(d*x+c)^(1/3))*coth(d*x+c)^(4/3)/b/d/(b*coth(d*x+c)^4)^(1/3)+1/2*arctanh(coth(d*x+c)^(1/3)/(1+coth(d*x+c)^(2/3)))*coth(d*x+c)^(4/3)/b/d/(b*coth(d*x+c)^4)^(1/3)-3/7*tanh(d*x+c)/b/d/(b*coth(d*x+c)^4)^(1/3)-3/13*tanh(d*x+c)^3/b/d/(b*coth(d*x+c)^4)^(1/3),1],
[(b*coth(d*x+c)^m)^n,x,3,coth(d*x+c)*(b*coth(d*x+c)^m)^n*hypergeom([1, 1/2*m*n+1/2],[1/2*m*n+3/2],coth(d*x+c)^2)/d/(m*n+1),1],
[(b*coth(d*x+c)^m)^(3/2),x,3,2*b*coth(d*x+c)^(1+m)*sqrt(b*coth(d*x+c)^m)*hypergeom([1, 1/2+3/4*m],[3/2+3/4*m],coth(d*x+c)^2)/d/(2+3*m),1],
[sqrt(b*coth(d*x+c)^m),x,3,2*coth(d*x+c)*sqrt(b*coth(d*x+c)^m)*hypergeom([1, 1/2+1/4*m],[3/2+1/4*m],coth(d*x+c)^2)/d/(2+m),1],
[1/sqrt(b*coth(d*x+c)^m),x,3,2*coth(d*x+c)*hypergeom([1, 1/2-1/4*m],[3/2-1/4*m],coth(d*x+c)^2)/d/(2-m)/sqrt(b*coth(d*x+c)^m),1],
[1/(b*coth(d*x+c)^m)^(3/2),x,3,2*coth(d*x+c)^(1-m)*hypergeom([1, 1/2-3/4*m],[3/2-3/4*m],coth(d*x+c)^2)/b/d/(2-3*m)/sqrt(b*coth(d*x+c)^m),1],
[(b*coth(d*x+c)^m)^(4/3),x,3,3*b*coth(d*x+c)^(1+m)*(b*coth(d*x+c)^m)^(1/3)*hypergeom([1, 1/2+2/3*m],[3/2+2/3*m],coth(d*x+c)^2)/d/(3+4*m),1],
[(b*coth(d*x+c)^m)^(2/3),x,3,3*coth(d*x+c)*(b*coth(d*x+c)^m)^(2/3)*hypergeom([1, 1/2+1/3*m],[3/2+1/3*m],coth(d*x+c)^2)/d/(3+2*m),1],
[(b*coth(d*x+c)^m)^(1/3),x,3,3*coth(d*x+c)*(b*coth(d*x+c)^m)^(1/3)*hypergeom([1, 1/2+1/6*m],[3/2+1/6*m],coth(d*x+c)^2)/d/(3+m),1],
[1/(b*coth(d*x+c)^m)^(1/3),x,3,3*coth(d*x+c)*hypergeom([1, 1/2-1/6*m],[3/2-1/6*m],coth(d*x+c)^2)/d/(3-m)/(b*coth(d*x+c)^m)^(1/3),1],
[1/(b*coth(d*x+c)^m)^(2/3),x,3,3*coth(d*x+c)*hypergeom([1, 1/2-1/3*m],[3/2-1/3*m],coth(d*x+c)^2)/d/(3-2*m)/(b*coth(d*x+c)^m)^(2/3),1],
[1/(b*coth(d*x+c)^m)^(4/3),x,3,3*coth(d*x+c)^(1-m)*hypergeom([1, 1/2-2/3*m],[3/2-2/3*m],coth(d*x+c)^2)/b/d/(3-4*m)/(b*coth(d*x+c)^m)^(1/3),1],
[(1+coth(x))^5,x,5,16*x-8*coth(x)-2*(1+coth(x))^2-2/3*(1+coth(x))^3-1/4*(1+coth(x))^4+16*ln(sinh(x)),1],
[(1+coth(x))^4,x,4,8*x-4*coth(x)-(1+coth(x))^2-1/3*(1+coth(x))^3+8*ln(sinh(x)),1],
[(1+coth(x))^3,x,3,4*x-2*coth(x)-1/2*(1+coth(x))^2+4*ln(sinh(x)),1],
[(1+coth(x))^2,x,2,2*x-coth(x)+2*ln(sinh(x)),1],
[1/(1+coth(x)),x,2,1/2*x-1/(2+2*coth(x)),1],
[1/(1+coth(x))^2,x,3,1/4*x-1/4/(1+coth(x))^2-1/(4+4*coth(x)),1],
[1/(1+coth(x))^3,x,4,1/8*x-1/6/(1+coth(x))^3-1/8/(1+coth(x))^2-1/(8+8*coth(x)),1],
[1/(1+coth(x))^4,x,5,1/16*x-1/8/(1+coth(x))^4-1/12/(1+coth(x))^3-1/16/(1+coth(x))^2-1/(16+16*coth(x)),1],
[1/(1+coth(x))^5,x,6,1/32*x-1/10/(1+coth(x))^5-1/16/(1+coth(x))^4-1/24/(1+coth(x))^3-1/32/(1+coth(x))^2-1/(32+32*coth(x)),1],
[(1+coth(x))^(7/2),x,5,8*sqrt(2)*arctanh(sqrt(1+coth(x))/sqrt(2))-8*sqrt(1+coth(x))-4/3*(1+coth(x))^(3/2)-2/5*(1+coth(x))^(5/2),1],
[(1+coth(x))^(5/2),x,4,4*sqrt(2)*arctanh(sqrt(1+coth(x))/sqrt(2))-4*sqrt(1+coth(x))-2/3*(1+coth(x))^(3/2),1],
[(1+coth(x))^(3/2),x,3,2*sqrt(2)*arctanh(sqrt(1+coth(x))/sqrt(2))-2*sqrt(1+coth(x)),1],
[sqrt(1+coth(x)),x,2,sqrt(2)*arctanh(sqrt(1+coth(x))/sqrt(2)),1],
[1/sqrt(1+coth(x)),x,3,arctanh(sqrt(1+coth(x))/sqrt(2))/sqrt(2)-1/sqrt(1+coth(x)),1],
[1/(1+coth(x))^(3/2),x,4,1/2*arctanh(sqrt(1+coth(x))/sqrt(2))/sqrt(2)-1/3/(1+coth(x))^(3/2)-1/2/sqrt(1+coth(x)),1],
[1/(1+coth(x))^(5/2),x,5,1/4*arctanh(sqrt(1+coth(x))/sqrt(2))/sqrt(2)-1/5/(1+coth(x))^(5/2)-1/6/(1+coth(x))^(3/2)-1/4/sqrt(1+coth(x)),1],
[(a+b*coth(d*x+c))^5,x,5,a*(a^4+10*a^2*b^2+5*b^4)*x-4*a*b^2*(a^2+b^2)*coth(d*x+c)/d-1/2*b*(3*a^2+b^2)*(a+b*coth(d*x+c))^2/d-2/3*a*b*(a+b*coth(d*x+c))^3/d-1/4*b*(a+b*coth(d*x+c))^4/d+b*(5*a^4+10*a^2*b^2+b^4)*ln(sinh(d*x+c))/d,1],
[(a+b*coth(d*x+c))^4,x,4,(a^4+6*a^2*b^2+b^4)*x-b^2*(3*a^2+b^2)*coth(d*x+c)/d-a*b*(a+b*coth(d*x+c))^2/d-1/3*b*(a+b*coth(d*x+c))^3/d+4*a*b*(a^2+b^2)*ln(sinh(d*x+c))/d,1],
[(a+b*coth(d*x+c))^3,x,3,a*(a^2+3*b^2)*x-2*a*b^2*coth(d*x+c)/d-1/2*b*(a+b*coth(d*x+c))^2/d+b*(3*a^2+b^2)*ln(sinh(d*x+c))/d,1],
[(a+b*coth(d*x+c))^2,x,2,(a^2+b^2)*x-b^2*coth(d*x+c)/d+2*a*b*ln(sinh(d*x+c))/d,1],
[1/(a+b*coth(d*x+c)),x,2,a*x/(a^2-b^2)-b*ln(b*cosh(d*x+c)+a*sinh(d*x+c))/(a^2-b^2)/d,1],
[1/(a+b*coth(d*x+c))^2,x,3,(a^2+b^2)*x/(a^2-b^2)^2+b/(a^2-b^2)/d/(a+b*coth(d*x+c))-2*a*b*ln(b*cosh(d*x+c)+a*sinh(d*x+c))/(a^2-b^2)^2/d,1],
[1/(a+b*coth(d*x+c))^3,x,4,a*(a^2+3*b^2)*x/(a^2-b^2)^3+1/2*b/(a^2-b^2)/d/(a+b*coth(d*x+c))^2+2*a*b/(a^2-b^2)^2/d/(a+b*coth(d*x+c))-b*(3*a^2+b^2)*ln(b*cosh(d*x+c)+a*sinh(d*x+c))/(a^2-b^2)^3/d,1],
[1/(a+b*coth(d*x+c))^4,x,5,(a^4+6*a^2*b^2+b^4)*x/(a^2-b^2)^4+1/3*b/(a^2-b^2)/d/(a+b*coth(d*x+c))^3+a*b/(a^2-b^2)^2/d/(a+b*coth(d*x+c))^2+b*(3*a^2+b^2)/(a^2-b^2)^3/d/(a+b*coth(d*x+c))-4*a*b*(a^2+b^2)*ln(b*cosh(d*x+c)+a*sinh(d*x+c))/(a^2-b^2)^4/d,1],
[1/(4+6*coth(d*x+c)),x,2,-1/5*x+3/10*ln(3*cosh(d*x+c)+2*sinh(d*x+c))/d,1],
[1/(4-6*coth(d*x+c)),x,2,-1/5*x-3/10*ln(3*cosh(d*x+c)-2*sinh(d*x+c))/d,1],
[sqrt(a+b*coth(d*x+c)),x,5,-sqrt(a-b)*arctanh(sqrt(a+b*coth(d*x+c))/sqrt(a-b))/d+sqrt(a+b)*arctanh(sqrt(a+b*coth(d*x+c))/sqrt(a+b))/d,1],
[1/sqrt(a+b*coth(d*x+c)),x,5,-arctanh(sqrt(a+b*coth(d*x+c))/sqrt(a-b))/sqrt(a-b)/d+arctanh(sqrt(a+b*coth(d*x+c))/sqrt(a+b))/sqrt(a+b)/d,1],
[(a+b*coth(f*x+e))^n*(d*csch(f*x+e))^m,x,2,-b*AppellF1(1+n,1-1/2*m,1-1/2*m,2+n,(a+b*coth(f*x+e))/(a-b),(a+b*coth(f*x+e))/(a+b))*(a+b*coth(f*x+e))^(1+n)*(d*csch(f*x+e))^m/(a^2-b^2)/f/(1+n)/((1-(a+b*coth(f*x+e))/(a-b))^(1/2*m))/((1-(a+b*coth(f*x+e))/(a+b))^(1/2*m)),1],
[sinh(x)^4/(1+coth(x)),x,4,5/16*x+1/32/(1-coth(x))^2+1/(8-8*coth(x))-1/24/(1+coth(x))^3-3/32/(1+coth(x))^2-3/(16+16*coth(x)),1],
[sinh(x)^3/(1+coth(x)),x,3,-4/5*cosh(x)+4/15*cosh(x)^3-sinh(x)^3/(5+5*coth(x)),1],
[sinh(x)^2/(1+coth(x)),x,4,-3/8*x-1/(8-8*coth(x))+1/8/(1+coth(x))^2+1/(4+4*coth(x)),1],
[sinh(x)/(1+coth(x)),x,2,2/3*cosh(x)-sinh(x)/(3+3*coth(x)),1],
[csch(x)/(1+coth(x)),x,1,-csch(x)/(1+coth(x)),1],
[csch(x)^2/(1+coth(x)),x,2,-ln(1+coth(x)),1],
[csch(x)^3/(1+coth(x)),x,2,arctanh(cosh(x))-csch(x),1],
[csch(x)^4/(1+coth(x)),x,2,-1/2*(1-coth(x))^2,1],
[sinh(x)^4/(a+b*coth(x)),x,3,1/16/(a+b)/(1-coth(x))^2+1/16*(3*a+5*b)/(a+b)^2/(1-coth(x))-1/16/(a-b)/(1+coth(x))^2-1/16*(3*a-5*b)/(a-b)^2/(1+coth(x))-1/16*(3*a^2+9*a*b+8*b^2)*ln(1-coth(x))/(a+b)^3+1/16*(3*a^2-9*a*b+8*b^2)*ln(1+coth(x))/(a-b)^3-b^5*ln(a+b*coth(x))/(a^2-b^2)^3,1],
[sinh(x)^2/(a+b*coth(x)),x,3,-1/4/(a+b)/(1-coth(x))+1/4/(a-b)/(1+coth(x))+1/4*(a+2*b)*ln(1-coth(x))/(a+b)^2-1/4*(a-2*b)*ln(1+coth(x))/(a-b)^2-b^3*ln(a+b*coth(x))/(a^2-b^2)^2,1],
[1/(a+b*coth(x)),x,2,a*x/(a^2-b^2)-b*ln(b*cosh(x)+a*sinh(x))/(a^2-b^2),1],
[csch(x)^2/(a+b*coth(x)),x,2,-ln(a+b*coth(x))/b,1],
[csch(x)^4/(a+b*coth(x)),x,3,a*coth(x)/b^2-1/2*coth(x)^2/b-(a^2-b^2)*ln(a+b*coth(x))/b^3,1],
[csch(x)^6/(a+b*coth(x)),x,3,a*(a^2-2*b^2)*coth(x)/b^4-1/2*(a^2-2*b^2)*coth(x)^2/b^3+1/3*a*coth(x)^3/b^2-1/4*coth(x)^4/b-(a^2-b^2)^2*ln(a+b*coth(x))/b^5,1],
[csch(x)^8/(a+b*coth(x)),x,3,a*(a^4-3*a^2*b^2+3*b^4)*coth(x)/b^6-1/2*(a^4-3*a^2*b^2+3*b^4)*coth(x)^2/b^5+1/3*a*(a^2-3*b^2)*coth(x)^3/b^4-1/4*(a^2-3*b^2)*coth(x)^4/b^3+1/5*a*coth(x)^5/b^2-1/6*coth(x)^6/b-(a^2-b^2)^3*ln(a+b*coth(x))/b^7,1],
[sinh(x)^3/(a+b*coth(x)),x,9,-b^4*arctanh((b+a*coth(x))*sinh(x)/sqrt(a^2-b^2))/(a^2-b^2)^(5/2)+a*b^2*cosh(x)/(a^2-b^2)^2-a*cosh(x)/(a^2-b^2)+a*cosh(x)^3/(3*a^2-3*b^2)-b^3*sinh(x)/(a^2-b^2)^2-b*sinh(x)^3/(3*a^2-3*b^2),1],
[sinh(x)/(a+b*coth(x)),x,5,-b^2*arctanh((b+a*coth(x))*sinh(x)/sqrt(a^2-b^2))/(a^2-b^2)^(3/2)+a*cosh(x)/(a^2-b^2)-b*sinh(x)/(a^2-b^2),1],
[csch(x)/(a+b*coth(x)),x,2,-arctanh((b+a*coth(x))*sinh(x)/sqrt(a^2-b^2))/sqrt(a^2-b^2),1],
[csch(x)^3/(a+b*coth(x)),x,5,a*arctanh(cosh(x))/b^2-sqrt(a^2-b^2)*arctanh((b+a*coth(x))*sinh(x)/sqrt(a^2-b^2))/b^2-csch(x)/b,1],
[csch(x)^5/(a+b*coth(x)),x,9,-1/2*a*arctanh(cosh(x))/b^2+a*(a^2-b^2)*arctanh(cosh(x))/b^4-(a^2-b^2)^(3/2)*arctanh((b+a*coth(x))*sinh(x)/sqrt(a^2-b^2))/b^4-(a^2-b^2)*csch(x)/b^3+1/2*a*coth(x)*csch(x)/b^2-1/3*csch(x)^3/b,1],
[cosh(x)^4/(1+coth(x)),x,5,1/16*x+1/32/(1-coth(x))^2-1/(8-8*coth(x))-1/24/(1+coth(x))^3+5/32/(1+coth(x))^2-3/(16+16*coth(x)),1],
[cosh(x)^3/(1+coth(x)),x,9,1/5*cosh(x)^5-1/3*sinh(x)^3-1/5*sinh(x)^5,1],
[cosh(x)^2/(1+coth(x)),x,5,1/8*x-1/(8-8*coth(x))+1/8/(1+coth(x))^2-1/(4+4*coth(x)),1],
[cosh(x)/(1+coth(x)),x,8,1/3*cosh(x)^3-1/3*sinh(x)^3,1],
[sech(x)/(1+coth(x)),x,8,arctan(sinh(x))+cosh(x)-sinh(x),1],
[sech(x)^2/(1+coth(x)),x,3,-ln(1+coth(x))-ln(tanh(x))+tanh(x),1],
[sech(x)^3/(1+coth(x)),x,8,-1/2*arctan(sinh(x))-sech(x)+1/2*sech(x)*tanh(x),1],
[sech(x)^4/(1+coth(x)),x,4,1/2*tanh(x)^2-1/3*tanh(x)^3,1],
[sqrt(1+coth(x))*sech(x)^2,x,4,arctanh(sqrt(1+coth(x)))+sqrt(1+coth(x))*tanh(x),1],
[cosh(x)^4/(a+b*coth(x)),x,5,-1/16*a*(3*a+b)*ln(1-coth(x))/(a+b)^3+1/16*a*(3*a-b)*ln(1+coth(x))/(a-b)^3-a^4*b*ln(a+b*coth(x))/(a^2-b^2)^3-1/8*(4*b*(2*a^2-b^2)-a*(5*a^2-b^2)*coth(x))*sinh(x)^2/(a^2-b^2)^2-(b-a*coth(x))*sinh(x)^4/(4*a^2-4*b^2),1],
[cosh(x)^3/(a+b*coth(x)),x,10,a^3*b*arctanh((a*cosh(x)+b*sinh(x))/sqrt(a^2-b^2))/(a^2-b^2)^(5/2)-a^2*b*cosh(x)/(a^2-b^2)^2-b*cosh(x)^3/(3*a^2-3*b^2)+a*b^2*sinh(x)/(a^2-b^2)^2+a*sinh(x)/(a^2-b^2)+a*sinh(x)^3/(3*a^2-3*b^2),1],
[cosh(x)^2/(a+b*coth(x)),x,4,-1/4*a*ln(1-coth(x))/(a+b)^2+1/4*a*ln(1+coth(x))/(a-b)^2-a^2*b*ln(a+b*coth(x))/(a^2-b^2)^2-(b-a*coth(x))*sinh(x)^2/(2*a^2-2*b^2),1],
[cosh(x)/(a+b*coth(x)),x,6,a*b*arctanh((a*cosh(x)+b*sinh(x))/sqrt(a^2-b^2))/(a^2-b^2)^(3/2)-b*cosh(x)/(a^2-b^2)+a*sinh(x)/(a^2-b^2),1],
[sech(x)/(a+b*coth(x)),x,6,arctan(sinh(x))/a+b*arctanh((a*cosh(x)+b*sinh(x))/sqrt(a^2-b^2))/a/sqrt(a^2-b^2),1],
[sech(x)^2/(a+b*coth(x)),x,3,-b*ln(a+b*coth(x))/a^2-b*ln(tanh(x))/a^2+tanh(x)/a,1],
[sech(x)^3/(a+b*coth(x)),x,9,1/2*arctan(sinh(x))/a-b^2*arctan(sinh(x))/a^3+b*sqrt(a^2-b^2)*arctanh((a*cosh(x)+b*sinh(x))/sqrt(a^2-b^2))/a^3-b*sech(x)/a^2+1/2*sech(x)*tanh(x)/a,1],
[sech(x)^4/(a+b*coth(x)),x,3,-b*(a^2-b^2)*ln(a+b*coth(x))/a^4-b*(a^2-b^2)*ln(tanh(x))/a^4+(a^2-b^2)*tanh(x)/a^3+1/2*b*tanh(x)^2/a^2-1/3*tanh(x)^3/a,1],
[sech(x)/(I+2*coth(x)),x,6,-I*arctan(sinh(x))-2*arctanh((cosh(x)-2*I*sinh(x))/sqrt(5))/sqrt(5),1],
[tanh(x)^4/(1+coth(x)),x,6,5/2*x-2*ln(cosh(x))-5/2*tanh(x)+tanh(x)^2-5/6*tanh(x)^3+tanh(x)^3/(2+2*coth(x)),1],
[tanh(x)^3/(1+coth(x)),x,5,-3/2*x+2*ln(cosh(x))+3/2*tanh(x)-tanh(x)^2+tanh(x)^2/(2+2*coth(x)),1],
[tanh(x)^2/(1+coth(x)),x,4,3/2*x-ln(cosh(x))-3/2*tanh(x)+tanh(x)/(2+2*coth(x)),1],
[tanh(x)/(1+coth(x)),x,4,-1/2*x+1/(2+2*coth(x))+ln(cosh(x)),1],
[1/(1+coth(x)),x,2,1/2*x-1/(2+2*coth(x)),1],
[coth(x)/(1+coth(x)),x,2,1/2*x+1/(2+2*coth(x)),1],
[coth(x)^2/(1+coth(x)),x,3,-1/2*x-1/(2+2*coth(x))+ln(sinh(x)),1],
[coth(x)^3/(1+coth(x)),x,3,3/2*x-3/2*coth(x)+coth(x)^2/(2+2*coth(x))-ln(sinh(x)),1],
[coth(x)^4/(1+coth(x)),x,4,-3/2*x+3/2*coth(x)-coth(x)^2+coth(x)^3/(2+2*coth(x))+2*ln(sinh(x)),1],
[coth(x)*(1+coth(x))^(3/2),x,4,2*sqrt(2)*arctanh(sqrt(1+coth(x))/sqrt(2))-2*sqrt(1+coth(x))-2/3*(1+coth(x))^(3/2),1],
[coth(x)*sqrt(1+coth(x)),x,3,sqrt(2)*arctanh(sqrt(1+coth(x))/sqrt(2))-2*sqrt(1+coth(x)),1],
[coth(x)/sqrt(1+coth(x)),x,3,arctanh(sqrt(1+coth(x))/sqrt(2))/sqrt(2)+1/sqrt(1+coth(x)),1],
[coth(x)/(1+coth(x))^(3/2),x,4,1/2*arctanh(sqrt(1+coth(x))/sqrt(2))/sqrt(2)+1/3/(1+coth(x))^(3/2)-1/2/sqrt(1+coth(x)),1],
[coth(x)^2*(1+coth(x))^(3/2),x,4,2*sqrt(2)*arctanh(sqrt(1+coth(x))/sqrt(2))-2*sqrt(1+coth(x))-2/5*(1+coth(x))^(5/2),1],
[coth(x)^2*sqrt(1+coth(x)),x,3,sqrt(2)*arctanh(sqrt(1+coth(x))/sqrt(2))-2/3*(1+coth(x))^(3/2),1],
[coth(x)^2/sqrt(1+coth(x)),x,4,arctanh(sqrt(1+coth(x))/sqrt(2))/sqrt(2)-1/sqrt(1+coth(x))-2*sqrt(1+coth(x)),1],
[coth(x)^2/(1+coth(x))^(3/2),x,4,1/2*arctanh(sqrt(1+coth(x))/sqrt(2))/sqrt(2)-1/3/(1+coth(x))^(3/2)+3/2/sqrt(1+coth(x)),1],
[tanh(x)^4/(a+b*coth(x)),x,6,a*x/(a^2-b^2)-b*(a^2+b^2)*ln(cosh(x))/a^4-b^5*ln(b*cosh(x)+a*sinh(x))/a^4/(a^2-b^2)-(a^2+b^2)*tanh(x)/a^3+1/2*b*tanh(x)^2/a^2-1/3*tanh(x)^3/a,1],
[tanh(x)^3/(a+b*coth(x)),x,5,-b*x/(a^2-b^2)+(a^2+b^2)*ln(cosh(x))/a^3+b^4*ln(b*cosh(x)+a*sinh(x))/a^3/(a^2-b^2)+b*tanh(x)/a^2-1/2*tanh(x)^2/a,1],
[tanh(x)^2/(a+b*coth(x)),x,4,a*x/(a^2-b^2)-b*ln(cosh(x))/a^2-b^3*ln(b*cosh(x)+a*sinh(x))/a^2/(a^2-b^2)-tanh(x)/a,1],
[tanh(x)/(a+b*coth(x)),x,3,-b*x/(a^2-b^2)+ln(cosh(x))/a+b^2*ln(b*cosh(x)+a*sinh(x))/a/(a^2-b^2),1],
[1/(a+b*coth(x)),x,2,a*x/(a^2-b^2)-b*ln(b*cosh(x)+a*sinh(x))/(a^2-b^2),1],
[coth(x)/(a+b*coth(x)),x,2,-b*x/(a^2-b^2)+a*ln(b*cosh(x)+a*sinh(x))/(a^2-b^2),1],
[coth(x)^2/(a+b*coth(x)),x,4,-a*x/b^2+a^3*x/b^2/(a^2-b^2)+ln(sinh(x))/b-a^2*ln(b*cosh(x)+a*sinh(x))/b/(a^2-b^2),1],
[coth(x)^3/(a+b*coth(x)),x,5,-b*x/(a^2-b^2)-coth(x)/b+a^3*ln(a+b*coth(x))/b^2/(a^2-b^2)+a*ln(sinh(x))/(a^2-b^2),1],
[coth(x)^4/(a+b*coth(x)),x,6,a*x/(a^2-b^2)+a*coth(x)/b^2-1/2*coth(x)^2/b-a^4*ln(a+b*coth(x))/b^3/(a^2-b^2)-b*ln(sinh(x))/(a^2-b^2),1],
[coth(x)^5/(a+b*coth(x)),x,7,-b*x/(a^2-b^2)-(a^2+b^2)*coth(x)/b^3+1/2*a*coth(x)^2/b^2-1/3*coth(x)^3/b+a^5*ln(a+b*coth(x))/b^4/(a^2-b^2)+a*ln(sinh(x))/(a^2-b^2),1],
[x*csch(x)^2/(a+b*coth(x))^2,x,3,-a*x/b/(a^2-b^2)+x/b/(a+b*coth(x))+ln(b*cosh(x)+a*sinh(x))/(a^2-b^2),1],
[x^3*coth(a+2*ln(x)),x,4,1/4*x^4+1/2*ln(1-exp(2*a)*x^4)/exp(2*a),1],
[x^2*coth(a+2*ln(x)),x,6,1/3*x^3+arctan(exp(1/2*a)*x)/exp(3/2*a)-arctanh(exp(1/2*a)*x)/exp(3/2*a),1],
[x*coth(a+2*ln(x)),x,4,1/2*x^2-arctanh(exp(a)*x^2)/exp(a),1],
[coth(a+2*ln(x)),x,5,x-arctan(exp(1/2*a)*x)/exp(1/2*a)-arctanh(exp(1/2*a)*x)/exp(1/2*a),1],
[coth(a+2*ln(x))/x,x,2,1/2*ln(sinh(a+2*ln(x))),1],
[coth(a+2*ln(x))/x^2,x,5,1/x+exp(1/2*a)*arctan(exp(1/2*a)*x)-exp(1/2*a)*arctanh(exp(1/2*a)*x),1],
[coth(a+2*ln(x))/x^3,x,4,1/2/x^2-exp(a)*arctanh(exp(a)*x^2),1],
[x^3*coth(a+2*ln(x))^2,x,4,1/4*x^4+1/exp(2*a)/(1-exp(2*a)*x^4)+ln(1-exp(2*a)*x^4)/exp(2*a),1],
[x^2*coth(a+2*ln(x))^2,x,7,1/3*x^3+x^3/(1-exp(2*a)*x^4)+3/2*arctan(exp(1/2*a)*x)/exp(3/2*a)-3/2*arctanh(exp(1/2*a)*x)/exp(3/2*a),1],
[x*coth(a+2*ln(x))^2,x,5,1/2*x^2+x^2/(1-exp(2*a)*x^4)-arctanh(exp(a)*x^2)/exp(a),1],
[coth(a+2*ln(x))^2,x,7,x+x/(1-exp(2*a)*x^4)-1/2*arctan(exp(1/2*a)*x)/exp(1/2*a)-1/2*arctanh(exp(1/2*a)*x)/exp(1/2*a),1],
[coth(a+2*ln(x))^2/x,x,3,-1/2*coth(a+2*ln(x))+ln(x),1],
[coth(a+2*ln(x))^2/x^2,x,7,-1/x+exp(2*a)*x^3/(1-exp(2*a)*x^4)-1/2*exp(1/2*a)*arctan(exp(1/2*a)*x)+1/2*exp(1/2*a)*arctanh(exp(1/2*a)*x),1],
[coth(a+2*ln(x))^2/x^3,x,6,-1/2/x^2+exp(2*a)*x^2/(1-exp(2*a)*x^4)+exp(a)*arctanh(exp(a)*x^2),1],
[(e*x)^m*coth(a+2*ln(x)),x,4,(e*x)^(1+m)/e/(1+m)-2*(e*x)^(1+m)*hypergeom([1, 1/4+1/4*m],[5/4+1/4*m],exp(2*a)*x^4)/e/(1+m),1],
[(e*x)^m*coth(a+2*ln(x))^2,x,5,(e*x)^(1+m)/e/(1+m)+(e*x)^(1+m)/e/(1-exp(2*a)*x^4)-(e*x)^(1+m)*hypergeom([1, 1/4+1/4*m],[5/4+1/4*m],exp(2*a)*x^4)/e,1],
[(e*x)^m*coth(a+2*ln(x))^3,x,6,(e*x)^(1+m)/e/(1+m)-(e*x)^(1+m)/e/(1-exp(2*a)*x^4)^2+1/4*(5+m)*(e*x)^(1+m)/e/(1-exp(2*a)*x^4)-1/4*(m^2+2*m+9)*(e*x)^(1+m)*hypergeom([1, 1/4+1/4*m],[5/4+1/4*m],exp(2*a)*x^4)/e/(1+m),1],
[coth(a+b*ln(x))^p,x,4,x*(-1-exp(2*a)*x^(2*b))^p*AppellF1(1/2/b,p,-p,1+1/2/b,exp(2*a)*x^(2*b),-exp(2*a)*x^(2*b))/((1+exp(2*a)*x^(2*b))^p),1],
[(e*x)^m*coth(a+b*ln(x))^p,x,5,(e*x)^(1+m)*(-1-exp(2*a)*x^(2*b))^p*AppellF1(1/2*(1+m)/b,p,-p,1+1/2*(1+m)/b,exp(2*a)*x^(2*b),-exp(2*a)*x^(2*b))/e/(1+m)/((1+exp(2*a)*x^(2*b))^p),1],
[coth(a+1/2*ln(x))^p,x,2,-(-1-exp(2*a)*x)^(p+1)*hypergeom([p, p+1],[2+p],1/2+1/2*exp(2*a)*x)/(2^p)/exp(2*a)/(p+1),1],
[coth(a+1/4*ln(x))^p,x,4,(-1-exp(2*a)*sqrt(x))^(p+1)*(1-exp(2*a)*sqrt(x))^(1-p)/exp(4*a)-2^(1-p)*p*(-1-exp(2*a)*sqrt(x))^(p+1)*hypergeom([p, p+1],[2+p],1/2+1/2*exp(2*a)*sqrt(x))/exp(4*a)/(p+1),1],
[coth(a+1/6*ln(x))^p,x,5,p*(-1-exp(2*a)*x^(1/3))^(p+1)*(1-exp(2*a)*x^(1/3))^(1-p)/exp(6*a)+(-1-exp(2*a)*x^(1/3))^(p+1)*(1-exp(2*a)*x^(1/3))^(1-p)*x^(1/3)/exp(4*a)-(2*p^2+1)*(-1-exp(2*a)*x^(1/3))^(p+1)*hypergeom([p, p+1],[2+p],1/2+1/2*exp(2*a)*x^(1/3))/(2^p)/exp(6*a)/(p+1),1],
[coth(a+1/8*ln(x))^p,x,6,1/3*(2*p^2-2*p+3)*(-1-exp(2*a)*x^(1/4))^(p+1)*(1-exp(2*a)*x^(1/4))^(1-p)/exp(8*a)-2/3*p*(-1-exp(2*a)*x^(1/4))^(2+p)*(1-exp(2*a)*x^(1/4))^(1-p)/exp(8*a)+(-1-exp(2*a)*x^(1/4))^(p+1)*(1-exp(2*a)*x^(1/4))^(1-p)*sqrt(x)/exp(4*a)-1/3*2^(2-p)*p*(p^2+2)*(-1-exp(2*a)*x^(1/4))^(p+1)*hypergeom([p, p+1],[2+p],1/2+1/2*exp(2*a)*x^(1/4))/exp(8*a)/(p+1),1],
[coth(a+ln(x))^p,x,4,x*(-1-exp(2*a)*x^2)^p*AppellF1(1/2,p,-p,3/2,exp(2*a)*x^2,-exp(2*a)*x^2)/((1+exp(2*a)*x^2)^p),1],
[coth(a+2*ln(x))^p,x,4,x*(-1-exp(2*a)*x^4)^p*AppellF1(1/4,p,-p,5/4,exp(2*a)*x^4,-exp(2*a)*x^4)/((1+exp(2*a)*x^4)^p),1],
[coth(a+3*ln(x))^p,x,4,x*(-1-exp(2*a)*x^6)^p*AppellF1(1/6,p,-p,7/6,exp(2*a)*x^6,-exp(2*a)*x^6)/((1+exp(2*a)*x^6)^p),1],
[x^3*coth(d*(a+b*ln(c*x^n))),x,4,1/4*x^4-1/2*x^4*hypergeom([1, 2/b/d/n],[1+2/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d)),1],
[x^2*coth(d*(a+b*ln(c*x^n))),x,4,1/3*x^3-2/3*x^3*hypergeom([1, 3/2/b/d/n],[1+3/2/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d)),1],
[x*coth(d*(a+b*ln(c*x^n))),x,4,1/2*x^2-x^2*hypergeom([1, 1/b/d/n],[1+1/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d)),1],
[coth(d*(a+b*ln(c*x^n))),x,4,x-2*x*hypergeom([1, 1/2/b/d/n],[1+1/2/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d)),1],
[coth(d*(a+b*ln(c*x^n)))/x,x,2,ln(sinh(a*d+b*d*ln(c*x^n)))/b/d/n,1],
[coth(d*(a+b*ln(c*x^n)))/x^2,x,4,-1/x+2*hypergeom([1, -1/2/b/d/n],[1-1/2/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d))/x,1],
[coth(d*(a+b*ln(c*x^n)))/x^3,x,4,-1/2/x^2+hypergeom([1, -1/b/d/n],[1-1/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d))/x^2,1],
[x^3*coth(d*(a+b*ln(c*x^n)))^2,x,5,1/4*(1+4/b/d/n)*x^4+x^4*(1+exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/n/(1-exp(2*a*d)*(c*x^n)^(2*b*d))-2*x^4*hypergeom([1, 2/b/d/n],[1+2/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/n,1],
[x^2*coth(d*(a+b*ln(c*x^n)))^2,x,5,1/3*(1+3/b/d/n)*x^3+x^3*(1+exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/n/(1-exp(2*a*d)*(c*x^n)^(2*b*d))-2*x^3*hypergeom([1, 3/2/b/d/n],[1+3/2/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/n,1],
[x*coth(d*(a+b*ln(c*x^n)))^2,x,5,1/2*(1+2/b/d/n)*x^2+x^2*(1+exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/n/(1-exp(2*a*d)*(c*x^n)^(2*b*d))-2*x^2*hypergeom([1, 1/b/d/n],[1+1/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/n,1],
[coth(d*(a+b*ln(c*x^n)))^2,x,5,(1+1/b/d/n)*x+x*(1+exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/n/(1-exp(2*a*d)*(c*x^n)^(2*b*d))-2*x*hypergeom([1, 1/2/b/d/n],[1+1/2/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/n,1],
[coth(d*(a+b*ln(c*x^n)))^2/x,x,3,-coth(a*d+b*d*ln(c*x^n))/b/d/n+ln(x),1],
[coth(d*(a+b*ln(c*x^n)))^2/x^2,x,5,-(1-1/b/d/n)/x+(1+exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/n/x/(1-exp(2*a*d)*(c*x^n)^(2*b*d))-2*hypergeom([1, -1/2/b/d/n],[1-1/2/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/n/x,1],
[coth(d*(a+b*ln(c*x^n)))^2/x^3,x,5,1/2*(-b*d*n+2)/b/d/n/x^2+(1+exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/n/x^2/(1-exp(2*a*d)*(c*x^n)^(2*b*d))-2*hypergeom([1, -1/b/d/n],[1-1/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/n/x^2,1],
[coth(a+b*ln(c*x^n))^3/x,x,3,-1/2*coth(a+b*ln(c*x^n))^2/b/n+ln(sinh(a+b*ln(c*x^n)))/b/n,1],
[coth(a+b*ln(c*x^n))^4/x,x,4,-coth(a+b*ln(c*x^n))/b/n-1/3*coth(a+b*ln(c*x^n))^3/b/n+ln(x),1],
[coth(a+b*ln(c*x^n))^5/x,x,4,-1/2*coth(a+b*ln(c*x^n))^2/b/n-1/4*coth(a+b*ln(c*x^n))^4/b/n+ln(sinh(a+b*ln(c*x^n)))/b/n,1],
[(e*x)^m*coth(d*(a+b*ln(c*x^n))),x,4,(e*x)^(1+m)/e/(1+m)-2*(e*x)^(1+m)*hypergeom([1, 1/2*(1+m)/b/d/n],[1+1/2*(1+m)/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d))/e/(1+m),1],
[(e*x)^m*coth(d*(a+b*ln(c*x^n)))^2,x,5,(b*d*n+m+1)*(e*x)^(1+m)/b/d/e/(1+m)/n+(e*x)^(1+m)*(1+exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/e/n/(1-exp(2*a*d)*(c*x^n)^(2*b*d))-2*(e*x)^(1+m)*hypergeom([1, 1/2*(1+m)/b/d/n],[1+1/2*(1+m)/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d))/b/d/e/n,1],
[(e*x)^m*coth(d*(a+b*ln(c*x^n)))^3,x,6,1/2*(b*d*n+m+1)*(2*b*d*n+m+1)*(e*x)^(1+m)/b^2/d^2/e/(1+m)/n^2-1/2*(e*x)^(1+m)*(1+exp(2*a*d)*(c*x^n)^(2*b*d))^2/b/d/e/n/(1-exp(2*a*d)*(c*x^n)^(2*b*d))^2+1/2*(e*x)^(1+m)*(exp(2*a*d)*(-2*b*d*n+m+1)/n+exp(4*a*d)*(2*b*d*n+m+1)*(c*x^n)^(2*b*d)/n)/b^2/d^2/e/exp(2*a*d)/n/(1-exp(2*a*d)*(c*x^n)^(2*b*d))-(2*b^2*d^2*n^2+m^2+2*m+1)*(e*x)^(1+m)*hypergeom([1, 1/2*(1+m)/b/d/n],[1+1/2*(1+m)/b/d/n],exp(2*a*d)*(c*x^n)^(2*b*d))/b^2/d^2/e/(1+m)/n^2,1],
[coth(d*(a+b*ln(c*x^n)))^p,x,5,x*(-1-exp(2*a*d)*(c*x^n)^(2*b*d))^p*AppellF1(1/2/b/d/n,p,-p,1+1/2/b/d/n,exp(2*a*d)*(c*x^n)^(2*b*d),-exp(2*a*d)*(c*x^n)^(2*b*d))/((1+exp(2*a*d)*(c*x^n)^(2*b*d))^p),1],
[(e*x)^m*coth(d*(a+b*ln(c*x^n)))^p,x,5,(e*x)^(1+m)*(-1-exp(2*a*d)*(c*x^n)^(2*b*d))^p*AppellF1(1/2*(1+m)/b/d/n,p,-p,1+1/2*(1+m)/b/d/n,exp(2*a*d)*(c*x^n)^(2*b*d),-exp(2*a*d)*(c*x^n)^(2*b*d))/e/(1+m)/((1+exp(2*a*d)*(c*x^n)^(2*b*d))^p),1],
[coth(a+b*ln(c*x^n))^(5/2)/x,x,7,-arctan(sqrt(coth(a+b*ln(c*x^n))))/b/n+arctanh(sqrt(coth(a+b*ln(c*x^n))))/b/n-2/3*coth(a+b*ln(c*x^n))^(3/2)/b/n,1],
[coth(a+b*ln(c*x^n))^(3/2)/x,x,7,arctan(sqrt(coth(a+b*ln(c*x^n))))/b/n+arctanh(sqrt(coth(a+b*ln(c*x^n))))/b/n-2*sqrt(coth(a+b*ln(c*x^n)))/b/n,1],
[sqrt(coth(a+b*ln(c*x^n)))/x,x,6,-arctan(sqrt(coth(a+b*ln(c*x^n))))/b/n+arctanh(sqrt(coth(a+b*ln(c*x^n))))/b/n,1],
[1/x/sqrt(coth(a+b*ln(c*x^n))),x,6,arctan(sqrt(coth(a+b*ln(c*x^n))))/b/n+arctanh(sqrt(coth(a+b*ln(c*x^n))))/b/n,1],
[1/x/coth(a+b*ln(c*x^n))^(3/2),x,7,-arctan(sqrt(coth(a+b*ln(c*x^n))))/b/n+arctanh(sqrt(coth(a+b*ln(c*x^n))))/b/n-2/b/n/sqrt(coth(a+b*ln(c*x^n))),1],
[1/x/coth(a+b*ln(c*x^n))^(5/2),x,7,arctan(sqrt(coth(a+b*ln(c*x^n))))/b/n+arctanh(sqrt(coth(a+b*ln(c*x^n))))/b/n-2/3/b/n/coth(a+b*ln(c*x^n))^(3/2),1],
[coth(x)^5/sqrt(a+b*coth(x)^2+c*coth(x)^4),x,8,1/4*(b-2*c)*arctanh(1/2*(b+2*c*coth(x)^2)/sqrt(c)/sqrt(a+b*coth(x)^2+c*coth(x)^4))/c^(3/2)+1/2*arctanh(1/2*(2*a+b+(b+2*c)*coth(x)^2)/sqrt(a+b+c)/sqrt(a+b*coth(x)^2+c*coth(x)^4))/sqrt(a+b+c)-1/2*sqrt(a+b*coth(x)^2+c*coth(x)^4)/c,1],
[coth(x)^3/sqrt(a+b*coth(x)^2+c*coth(x)^4),x,7,-1/2*arctanh(1/2*(b+2*c*coth(x)^2)/sqrt(c)/sqrt(a+b*coth(x)^2+c*coth(x)^4))/sqrt(c)+1/2*arctanh(1/2*(2*a+b+(b+2*c)*coth(x)^2)/sqrt(a+b+c)/sqrt(a+b*coth(x)^2+c*coth(x)^4))/sqrt(a+b+c),1],
[coth(x)/sqrt(a+b*coth(x)^2+c*coth(x)^4),x,4,1/2*arctanh(1/2*(2*a+b+(b+2*c)*coth(x)^2)/sqrt(a+b+c)/sqrt(a+b*coth(x)^2+c*coth(x)^4))/sqrt(a+b+c),1],
[tanh(x)/sqrt(a+b*coth(x)^2+c*coth(x)^4),x,8,-1/2*arctanh(1/2*(2*a+b*coth(x)^2)/sqrt(a)/sqrt(a+b*coth(x)^2+c*coth(x)^4))/sqrt(a)+1/2*arctanh(1/2*(2*a+b+(b+2*c)*coth(x)^2)/sqrt(a+b+c)/sqrt(a+b*coth(x)^2+c*coth(x)^4))/sqrt(a+b+c),1],
[tanh(x)^3/sqrt(a+b*coth(x)^2+c*coth(x)^4),x,8,-1/4*(2*a-b)*arctanh(1/2*(2*a+b*coth(x)^2)/sqrt(a)/sqrt(a+b*coth(x)^2+c*coth(x)^4))/a^(3/2)+1/2*arctanh(1/2*(2*a+b+(b+2*c)*coth(x)^2)/sqrt(a+b+c)/sqrt(a+b*coth(x)^2+c*coth(x)^4))/sqrt(a+b+c)-1/2*sqrt(a+b*coth(x)^2+c*coth(x)^4)*tanh(x)^2/a,1],
[coth(x)*sqrt(a+b*coth(x)^2+c*coth(x)^4),x,8,-1/4*(b+2*c)*arctanh(1/2*(b+2*c*coth(x)^2)/sqrt(c)/sqrt(a+b*coth(x)^2+c*coth(x)^4))/sqrt(c)+1/2*sqrt(a+b+c)*arctanh(1/2*(2*a+b+(b+2*c)*coth(x)^2)/sqrt(a+b+c)/sqrt(a+b*coth(x)^2+c*coth(x)^4))-1/2*sqrt(a+b*coth(x)^2+c*coth(x)^4),1],
[exp(c*(b*x+a))*(coth(b*c*x+a*c)^2)^(5/2),x,9,exp(c*(b*x+a))*sqrt(coth(b*c*x+a*c)^2)*tanh(b*c*x+a*c)/b/c-4*exp(c*(b*x+a))*sqrt(coth(b*c*x+a*c)^2)*tanh(b*c*x+a*c)/b/c/(1-exp(2*c*(b*x+a)))^4+26/3*exp(c*(b*x+a))*sqrt(coth(b*c*x+a*c)^2)*tanh(b*c*x+a*c)/b/c/(1-exp(2*c*(b*x+a)))^3-55/6*exp(c*(b*x+a))*sqrt(coth(b*c*x+a*c)^2)*tanh(b*c*x+a*c)/b/c/(1-exp(2*c*(b*x+a)))^2+25/4*exp(c*(b*x+a))*sqrt(coth(b*c*x+a*c)^2)*tanh(b*c*x+a*c)/b/c/(1-exp(2*c*(b*x+a)))-15/4*arctanh(exp(c*(b*x+a)))*sqrt(coth(b*c*x+a*c)^2)*tanh(b*c*x+a*c)/b/c,1],
[exp(c*(b*x+a))*(coth(b*c*x+a*c)^2)^(3/2),x,7,exp(c*(b*x+a))*sqrt(coth(b*c*x+a*c)^2)*tanh(b*c*x+a*c)/b/c-2*exp(c*(b*x+a))*sqrt(coth(b*c*x+a*c)^2)*tanh(b*c*x+a*c)/b/c/(1-exp(2*c*(b*x+a)))^2+3*exp(c*(b*x+a))*sqrt(coth(b*c*x+a*c)^2)*tanh(b*c*x+a*c)/b/c/(1-exp(2*c*(b*x+a)))-3*arctanh(exp(c*(b*x+a)))*sqrt(coth(b*c*x+a*c)^2)*tanh(b*c*x+a*c)/b/c,1],
[exp(c*(b*x+a))*sqrt(coth(b*c*x+a*c)^2),x,4,exp(c*(b*x+a))*sqrt(coth(b*c*x+a*c)^2)*tanh(b*c*x+a*c)/b/c-2*arctanh(exp(c*(b*x+a)))*sqrt(coth(b*c*x+a*c)^2)*tanh(b*c*x+a*c)/b/c,1],
[exp(c*(b*x+a))/sqrt(coth(b*c*x+a*c)^2),x,4,exp(c*(b*x+a))*coth(b*c*x+a*c)/b/c/sqrt(coth(b*c*x+a*c)^2)-2*arctan(exp(c*(b*x+a)))*coth(b*c*x+a*c)/b/c/sqrt(coth(b*c*x+a*c)^2),1],
[exp(c*(b*x+a))/(coth(b*c*x+a*c)^2)^(3/2),x,7,exp(c*(b*x+a))*coth(b*c*x+a*c)/b/c/sqrt(coth(b*c*x+a*c)^2)-2*exp(c*(b*x+a))*coth(b*c*x+a*c)/b/c/(1+exp(2*c*(b*x+a)))^2/sqrt(coth(b*c*x+a*c)^2)+3*exp(c*(b*x+a))*coth(b*c*x+a*c)/b/c/(1+exp(2*c*(b*x+a)))/sqrt(coth(b*c*x+a*c)^2)-3*arctan(exp(c*(b*x+a)))*coth(b*c*x+a*c)/b/c/sqrt(coth(b*c*x+a*c)^2),1],
[exp(c*(b*x+a))/(coth(b*c*x+a*c)^2)^(5/2),x,9,exp(c*(b*x+a))*coth(b*c*x+a*c)/b/c/sqrt(coth(b*c*x+a*c)^2)-4*exp(c*(b*x+a))*coth(b*c*x+a*c)/b/c/(1+exp(2*c*(b*x+a)))^4/sqrt(coth(b*c*x+a*c)^2)+26/3*exp(c*(b*x+a))*coth(b*c*x+a*c)/b/c/(1+exp(2*c*(b*x+a)))^3/sqrt(coth(b*c*x+a*c)^2)-55/6*exp(c*(b*x+a))*coth(b*c*x+a*c)/b/c/(1+exp(2*c*(b*x+a)))^2/sqrt(coth(b*c*x+a*c)^2)+25/4*exp(c*(b*x+a))*coth(b*c*x+a*c)/b/c/(1+exp(2*c*(b*x+a)))/sqrt(coth(b*c*x+a*c)^2)-15/4*arctan(exp(c*(b*x+a)))*coth(b*c*x+a*c)/b/c/sqrt(coth(b*c*x+a*c)^2),1],
[sin(coth(b*x+a))^3,x,19,-3/8*Ci(1-coth(b*x+a))*sin(1)/b-3/8*Ci(1+coth(b*x+a))*sin(1)/b+1/8*Ci(3-3*coth(b*x+a))*sin(3)/b+1/8*Ci(3+3*coth(b*x+a))*sin(3)/b-1/8*cos(3)*Si(3-3*coth(b*x+a))/b+3/8*cos(1)*Si(1-coth(b*x+a))/b+3/8*cos(1)*Si(1+coth(b*x+a))/b-1/8*cos(3)*Si(3+3*coth(b*x+a))/b,1],
[sin(coth(b*x+a))^2,x,13,1/4*cos(2)*Ci(2-2*coth(b*x+a))/b-1/4*cos(2)*Ci(2+2*coth(b*x+a))/b-1/4*ln(1-coth(b*x+a))/b+1/4*ln(1+coth(b*x+a))/b+1/4*sin(2)*Si(2-2*coth(b*x+a))/b-1/4*sin(2)*Si(2+2*coth(b*x+a))/b,1],
[sin(coth(b*x+a)),x,9,-1/2*Ci(1-coth(b*x+a))*sin(1)/b-1/2*Ci(1+coth(b*x+a))*sin(1)/b+1/2*cos(1)*Si(1-coth(b*x+a))/b+1/2*cos(1)*Si(1+coth(b*x+a))/b,1],
[csc(coth(b*x+a)),x,3,1/2*Defer(Int)(-csc(coth(b*x+a))*csch(b*x+a)^2/(1-coth(b*x+a)),x)-1/2*Defer(Int)(csc(coth(b*x+a))*csch(b*x+a)^2/(1+coth(b*x+a)),x),0],
[cos(coth(b*x+a))^3,x,19,-1/8*cos(3)*Ci(3-3*coth(b*x+a))/b-3/8*cos(1)*Ci(1-coth(b*x+a))/b+3/8*cos(1)*Ci(1+coth(b*x+a))/b+1/8*cos(3)*Ci(3+3*coth(b*x+a))/b-1/8*sin(3)*Si(3-3*coth(b*x+a))/b-3/8*sin(1)*Si(1-coth(b*x+a))/b+3/8*sin(1)*Si(1+coth(b*x+a))/b+1/8*sin(3)*Si(3+3*coth(b*x+a))/b,1],
[cos(coth(b*x+a))^2,x,13,-1/4*cos(2)*Ci(2-2*coth(b*x+a))/b+1/4*cos(2)*Ci(2+2*coth(b*x+a))/b-1/4*ln(1-coth(b*x+a))/b+1/4*ln(1+coth(b*x+a))/b-1/4*sin(2)*Si(2-2*coth(b*x+a))/b+1/4*sin(2)*Si(2+2*coth(b*x+a))/b,1],
[cos(coth(b*x+a)),x,9,-1/2*cos(1)*Ci(1-coth(b*x+a))/b+1/2*cos(1)*Ci(1+coth(b*x+a))/b-1/2*sin(1)*Si(1-coth(b*x+a))/b+1/2*sin(1)*Si(1+coth(b*x+a))/b,1],
[sec(coth(b*x+a)),x,3,1/2*Defer(Int)(-csch(b*x+a)^2*sec(coth(b*x+a))/(1-coth(b*x+a)),x)-1/2*Defer(Int)(csch(b*x+a)^2*sec(coth(b*x+a))/(1+coth(b*x+a)),x),0]]: