Multiple Sums
- To: mathgroup at smc.vnet.net
- Subject: [mg114737] Multiple Sums
- From: omri-piano <omrit1248 at gmail.com>
- Date: Tue, 14 Dec 2010 06:58:07 -0500 (EST)
Hi,
I am trying to evaluate an expression with multiple sums, but whenever the expression has 10 or more sum iterations then Mathematica seems never to end the computationâ?¦ Any ideas? I tried ParallelSum[] also, but to no avail.
For instance, my expression for 10 iterations looks like,
M5[m1_,m2_,n_,p_,q_]:=Sum[Myfunc[i,n]],{i,0,n}] *f[j1,m1,p,1]*f[k1,m2,q,1]*f[j2,m1,p,2]*f[k2,m2,q,2]*f[j3,m1,p,3]*f[k3,m2,q,3]*f[j4,m1,p,4]*f[k4,m2,q,4]*f[j5,m1,p,5]*f[k5,m2,q,5],{j1,0,1,1/m1},{k1,0,1,1/m2},{j2,0,1,1/m1},{k2,0,1,1/m2},{j3,0,1,1/m1},{k3,0,1,1/m2},{j4,0,1,1/m1},{k4,0,1,1/m2},{j5,0,1,1/m1},{k5,0,1,1/m2}]
(where p and q are lists).
Tx,
Omri.