In the name God,
Hello all,
I'm a maple16-x64 user.
I am to solve a nonlinear 3-equation-system (Vector RO) for which I have It's exact solution up to 90 digits(Vector valued;)
http://bayanbox.ir/blog/hossayni/codes/RO.m?download
http://bayanbox.ir/blog/hossayni/codes/valued.m?download
Unbelievably, when I pass the exact values as initial to fsolve() function, it can't solve it.
restart;
Digits:=90:
read "RO.m"
read "valued.m"
fsolve({seq(RO[i],i=1..3)},{seq(oO[i]=valued[i+1],i=0..2)};
To confirm about the initial values you may check it so:
y:=evalf(eval(RO,{seq(oO[i]=valued[i+1],i=0..2)})):
Vector(3,i->(round(10^90*y[i])/10^90));
Which yields zero vector.
All of the instructions are here:
http://bayanbox.ir/blog/hossayni/codes/solver.mw?download
Best regards