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

whdwpy666

f[x_] := 1/(A - F*x^2 + x*B I);
" [" M3 f4 Z, A5 X3 jg[y_] := 1/(A - F*y^2 + y*B I);
h[z_] := 1/(A - F*z^2 + z*B I);
% \' Z0 a! e8 K3 I9 v: Tj[x_, y_, z_] := 1/(A - F*(x + y + z)^2 - (x + y + z)*B I);
result = Integrate[f[x]*g[y]*h[z]*j[x, y, z], x, y, z]
( ^2 c" F# g1 \, j% p所有的积分上限都是+ 无穷，下限是 - 无穷。

我想请教一下，有没有什么方法可以计算这个三重积分？
/ s1 B* M0 C$ L当我转化了球面坐标后，发现还是算不动。。。。


$ R) X( ?4 v6 w8 M# U4 K3 K7 |f[x_] := 1/(a - c*x^2 + x*b I);
2 {5 o  {% k4 S4 z/ l' F! o! Fg[y_] := 1/(a - c*y^2 + y*b I);
7 j# Y7 G' o1 W8 F  k  M* X& p3 F& th[z_] := 1/(a - c*z^2 + z*b I);
8 _. C/ P% b! G" y# v1 W9 U6 Z1 I" oj[x_, y_, z_] := 1/(a - c*(x + y + z)^2 - (x + y + z)*b I);
\[Theta]1 = 0; \[Theta]2 = Pi; \[Phi]1 = 0; \[Phi]2 =
2*Pi; r1 = 0; r2 = 1;
Integrate[
) b% ~! S. u/ m4 p0 |r^2*Sin[\[Theta]]*f[r Sin[\[Theta]] Cos[\[Phi]]]*
* A' T, f6 H; r) g' F" Mg[r Sin[\[Theta]] Sin[\[Phi]]]*h[r Cos[\[Theta]]]*
4 M+ a2 e# o1 w7 w" Oj[r Sin[\[Theta]] Cos[\[Phi]], r Sin[\[Theta]] Sin[\[Phi]],
/ _5 s8 z: Y! E. L. f5 B8 ]2 @r Cos[\[Theta]]], {\[Phi], \[Phi]1, \[Phi]2}, {r, r1,
/ {4 z- o& Q0 @; @r2}, {\[Theta], \[Theta]1, \[Theta]2},]

( U( U9 O" y; ^( w