Maple numerical integration and eq. solving

  • Maple
  • Thread starter cva
  • Start date
cva
18
0

Main Question or Discussion Point

How can I speed up some calculations in maple? I have a function

f(A)=A*I_0(A)/I_1(A)-c0*log(A/I_1(0))-1

I_0(A)=NInt(exp(A*c1*cos(x)*cos(y)*cos(z)), 0..2*Pi)
I_1(A)=NInt(cos(x)*cos(y)*cos(z)*exp(A*c1*cos(x)*cos(y)*cos(z)), 0..2*Pi)

c0 and c1 are known constants.

I need to solve the equation f=0. for this I am using the command fsolve(f=0,A). The 1D version is quite fast, but when I am in 3D the numerical integration takes for ever. Is there any way to speed up the calculations?:cry:
1. Homework Statement
 

Answers and Replies

Related Threads for: Maple numerical integration and eq. solving

Replies
0
Views
1K
Replies
0
Views
3K
  • Last Post
Replies
0
Views
2K
Replies
0
Views
2K
Replies
0
Views
5K
  • Last Post
Replies
0
Views
2K
  • Last Post
Replies
0
Views
2K
Top