int2Red.txt

{Pair[Momentum[l[1]], Momentum[v[2]]]^2*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 0] + 2*Pair[Momentum[l[1]], Momentum[v[2]]]*Pair[Momentum[q[1]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 0] + Pair[Momentum[q[1]], Momentum[v[2]]]^2*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 0], Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Pair[Momentum[q[1]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Pair[Momentum[q[1]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2, Pair[Momentum[l[1]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 0] + Pair[Momentum[q[1]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 0], 2*Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 3, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 3, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2), Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2, Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 0], 2*Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]] + SP[q[1], v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 3, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]] + SP[q[1], v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 3, 1, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]] + SP[q[1], v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2), Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]] + SP[q[1], v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]] + SP[q[1], v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2, Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]] + SP[q[1], v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 1, 0], 2*Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]] + SP[q[1], v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 3, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]] + SP[q[1], v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 3, 2, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]] + SP[q[1], v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2), Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]] + SP[q[1], v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]] + SP[q[1], v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2, Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]] + SP[q[1], v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 1, 0], 2*Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]^2*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 3, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]] + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]^2*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 3, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]^2*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 3, 1, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]^2*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]^2*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2) + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 1, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]^2*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/4 + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]^2*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/4) + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]^2*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]^2*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2), Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[3, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]^2*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 2, 2]*Riemann[k][μ1, lI[3, 2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[3, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]^2*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 1, 2]*Riemann[k][μ1, lI[3, 2, 2], lI[0, 1], lI[0, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[3, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]^2*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 1, 2]*Riemann[k][μ1, lI[3, 2, 2], lI[0, 1], lI[0, 2]])/2, Pair[Momentum[l[1]], Momentum[v[2]]]^2*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 1, 0], Pair[Momentum[l[1]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 0], Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 2, 2]*Riemann[k][μ1, lI[2, 2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 1, 2]*Riemann[k][μ1, lI[2, 2, 2], lI[0, 1], lI[0, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 1, 2]*Riemann[k][μ1, lI[2, 2, 2], lI[0, 1], lI[0, 2]])/2, Pair[Momentum[l[1]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 1, 0], Pair[Momentum[l[1]], Momentum[p[3]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 0] + Pair[Momentum[p[3]], Momentum[q[1]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 0], Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2, Y[{SP[l1, l1], SP[l1, v[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 0], 2*Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 3, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]] + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 3, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 3, 1, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2) + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 1, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/4 + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/4) + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2), Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2, Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 1, 0], 2*Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[p[3]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 3, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]] + 2*Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[p[3]], Momentum[q[1]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 3, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[p[3]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 3, 1, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[p[3]], Momentum[q[1]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 3, 1, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 2, 4]*(-1/2*(Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]]) - (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2) + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 1, 4]*(-1/4*(Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]]) - (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/4) + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[p[3]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[p[3]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2) + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[p[3]], Momentum[q[1]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[p[3]], Momentum[q[1]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2), -1/2*(Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]]) + Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[p[3]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Pair[Momentum[p[3]], Momentum[q[1]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[p[3]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Pair[Momentum[p[3]], Momentum[q[1]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2, Pair[Momentum[l[1]], Momentum[p[3]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 1, 0] + Pair[Momentum[p[3]], Momentum[q[1]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 1, 0], 2*Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 3, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 3, 1, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2), Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2, Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 1, 0], Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 1, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 2, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 1, 1, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2, Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 1, 1, 1, 0], 2*Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[p[3]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 3, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]] + 2*Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[p[3]], Momentum[q[1]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 3, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[p[3]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 3, 2, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[p[3]], Momentum[q[1]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 3, 2, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2, 4]*(-1/2*(Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]]) - (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2) + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 1, 4]*(-1/4*(Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]]) - (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/4) + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[p[3]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[p[3]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2) + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[p[3]], Momentum[q[1]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Pair[Momentum[p[3]], Momentum[q[1]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2), -1/2*(Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]]) + Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[p[3]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Pair[Momentum[p[3]], Momentum[q[1]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Pair[Momentum[l[1]], Momentum[p[3]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Pair[Momentum[p[3]], Momentum[q[1]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2, Pair[Momentum[l[1]], Momentum[p[3]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 1, 0] + Pair[Momentum[p[3]], Momentum[q[1]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 1, 0], 2*Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 3, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 3, 2, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2), Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2, Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 1, 0], 2*Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 1, 3, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]] + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 3, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 3, 2, 1, 1, 4]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2) + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 2, 1, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[p[3]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/4 + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/4) + Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 1, 2, 4]*((Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[μ2], Momentum[q[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[μ2], Momentum[v[1]]]*Pair[LorentzIndex[lI[1, 2, 2]], Momentum[v[2]]]*Pair[LorentzIndex[lI[2, 2, 2]], Momentum[v[2]]]*Riemann[k][μ1, lI[1, 2, 2], μ2, lI[2, 2, 2]])/2), Pair[LorentzIndex[μ1], Momentum[q[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 1, 2, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]] + (Pair[LorentzIndex[μ1], Momentum[p[3]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 2, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2 + (Pair[LorentzIndex[μ1], Momentum[v[1]]]*Pair[LorentzIndex[lI[0, 1]], Momentum[v[0]]]*Pair[LorentzIndex[lI[0, 2]], Momentum[w[0]]]*Pair[LorentzIndex[lI[2, 2]], Momentum[v[2]]]*Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 2, 2, 1, 1, 2]*Riemann[k][μ1, lI[2, 2], lI[0, 1], lI[0, 2]])/2, Y[{SP[l1, l1], SP[l1, v[1]], SP[l1, v[2]], SP[l1, p[3]] + SP[p[3], q[1]], SP[l1 + q[1], l1 + q[1]]}, 1, 1, 2, 1, 1, 0]}