复杂的三重积分，mathematica算不了？

whdwpy666

f[x_] := 1/(A - F*x^2 + x*B I);
g[y_] := 1/(A - F*y^2 + y*B I);
7 i. T  Y, @+ R9 x; \  \8 Ah[z_] := 1/(A - F*z^2 + z*B I);
5 b6 M. G3 Z: }  [# dj[x_, y_, z_] := 1/(A - F*(x + y + z)^2 - (x + y + z)*B I);
# k2 b/ v0 a0 V/ X- u' M& Tresult = Integrate[f[x]*g[y]*h[z]*j[x, y, z], x, y, z]
所有的积分上限都是+ 无穷，下限是 - 无穷。
! `8 O( B0 k+ L) J  H9 x$ f
我想请教一下，有没有什么方法可以计算这个三重积分？
当我转化了球面坐标后，发现还是算不动。。。。


& w! i, k" ?3 vf[x_] := 1/(a - c*x^2 + x*b I);
+ H3 h+ X4 |8 d- [g[y_] := 1/(a - c*y^2 + y*b I);
h[z_] := 1/(a - c*z^2 + z*b I);
+ _6 e: b# y1 j& \  @j[x_, y_, z_] := 1/(a - c*(x + y + z)^2 - (x + y + z)*b I);
4 o9 k- e# i/ r$ }! K4 Z\[Theta]1 = 0; \[Theta]2 = Pi; \[Phi]1 = 0; \[Phi]2 =
+ a" S+ m! P4 T0 f1 Q" M% v) e2*Pi; r1 = 0; r2 = 1;
% w& {9 `! V5 }Integrate[
r^2*Sin[\[Theta]]*f[r Sin[\[Theta]] Cos[\[Phi]]]*
g[r Sin[\[Theta]] Sin[\[Phi]]]*h[r Cos[\[Theta]]]*
; b& E0 p8 D; Cj[r Sin[\[Theta]] Cos[\[Phi]], r Sin[\[Theta]] Sin[\[Phi]],
7 p5 Q* K/ J9 I6 L: ar Cos[\[Theta]]], {\[Phi], \[Phi]1, \[Phi]2}, {r, r1,
4 [- l* _$ }6 P: B4 X2 w/ d. Er2}, {\[Theta], \[Theta]1, \[Theta]2},]
' _. g( o2 t7 ^. d) E