RE: Re: Quick integral.

*To*: mathgroup at smc.vnet.net*Subject*: [mg73595] RE: [mg73491] Re: Quick integral.*From*: "Jouvenot, Fabrice" <F.Jouvenot at liverpool.ac.uk>*Date*: Thu, 22 Feb 2007 04:43:27 -0500 (EST)*References*: <erc23r$mv4$1@smc.vnet.net> <200702201115.GAA07658@smc.vnet.net>

>There seem to be problems with the notebook you posted that >make it unreliable to try to evaluate. That have been fixed, you can access it now here : http://www.onyrium.net/Mathematica/CoordStat-ok.nb >toto[l_] := Sum[dNd=CF=95[l, angle=CF=95[=CE=A8, thc, = =CE=B8source], thc]* > AcceptancePMT[angleLightOM[vOM, > vlight[thc, =CE=A8, =CE=B8source, l]]], {=CE=A8, =CF=80/2,2=CF=80,=CF=80= }]; >is only slightly faster, because of the very complicated expression to >be evaluated, but produces approximately the same result as NIntegrate >evaluating across the entire interval. In fact I tried to use Sum, but the time it takes is 4 to 5 times the time used with Nintegrate. And if I use Nsum then it is twice quicker than Sum, but still longer than with Nintegrate. Thanks for your help, any comments are welcome because I am getting mad trying to do that quicker... Cheers, Fabrice.

**References**:**Re: Quick integral.***From:*dontdont@gmail.com