Computation of the term proportional to q_αq_β

Second derivative of the source without index contraction

velocitytensor[1] = u^(d + z + 2)/2Gauss[4]

2^(-2 - d) ^(-Abs[x]^2/(4 u)) π^(-d/2) u^(-2 - d/2 + 1/2 (2 + d + z)) (2 u K[α, β] - x[α] x[β])

velocitytensor[2] = PowerExpand[Integrate[velocitytensor[1]/u, {u, 0, Infinity}, GenerateConditionsFalse]]/.a_^b_a^Expand[b]

2^(-1 - d - z) π^(-d/2) Abs[x]^(-2 + z) (Abs[x]^2 Gamma[-z/2] K[α, β] - 2 Gamma[1 - z/2] x[α] x[β])

Created by Mathematica  (March 14, 2006)