lst:=[[(d*x^2+c)^4*arccoth(a*x),x,1], [(d*x^2+c)^3*arccoth(a*x),x,1], [(d*x^2+c)^2*arccoth(a*x),x,1], [(d*x^2+c)*arccoth(a*x),x,1], [arccoth(a*x)/(d*x^2+c),x,1], [arccoth(a*x)/(d*x^2+c)^2,x,1], [arccoth(a*x)/(d*x^2+c)^3,x,1], [(-a*x^2+a)^(1/2)*arccoth(x),x,1], [arccoth(x)/(-a*x^2+a)^(1/2),x,1], [arccoth(x)/(-a*x^2+a)^(3/2),x,1], [arccoth(x)/(-a*x^2+a)^(5/2),x,1], [arccoth(x)/(-a*x^2+a)^(7/2),x,1], [(d*x^2+c)^(1/2)*arccoth(a*x),x,0], [arccoth(a*x)/(d*x^2+c)^(1/2),x,0], [arccoth(a*x)/(d*x^2+c)^(3/2),x,1], [arccoth(a*x)/(d*x^2+c)^(5/2),x,1], [arccoth(a*x)/(d*x^2+c)^(7/2),x,1], [arccoth(a*x)/(d*x^2+c)^(9/2),x,1], [1/(-x^2+1)/arccoth(x),x,1], [arccoth(x)^2/(-x^2+1)^2,x,1], [arccoth(x)^n/(-x^2+1),x,1], [x*arccoth(x)/(-x^2+1),x,1], [arccoth(x)/(-x^2+1),x,1], [x*arccoth(x)/(-x^2+1)^2,x,1], [arccoth(x)/(-x^2+1)^2,x,1], [x*arccoth(x)/(-x^2+1)^3,x,1], [arccoth(x)/(-x^2+1)^3,x,1]]