Coefficients

smallscalecoeff[1] = FullSimplify[{Coefficient[smallscale[1], Log[Abs[x]], 0], Coefficient[sma ... [a_] :>0, EulerGamma0, PolyGamma[0, (2 + d)/2] 0}, ExcludedFormsAbs[x]]

{(d (3 + d) Abs[x]^2 K[α, β] - 4 x[α] x[β])/(2 (-1 + d) (2 + d)^2), (-(1 + ...  (-2 + d + d^2)), ((1 + d) Abs[x]^2 K[α, β] - 2 x[α] x[β])/(2 (-2 + d + d^2))}

The small scale asymptotics has OPPOSITE sign than the residue of the Mellin transform. The sign is compensated by the CONTOUR orientation.


Created by Mathematica  (March 14, 2006)