Advanced Search

Question: Find root using fsolve or solve command

Question:Find root using fsolve or solve command

kh2n 220 Maple 13
solve
October 03 2010
0



> 

restart:
> 

H:=7.1;C:=1.96;k:=4;R:=45;Pei:=12.2;Theta0:=14;Q:=0.5;

(1)
> 

A3:=(Q*(R*S+1-S)*(H-H*exp(-Pei)+1)*exp(-k*Pei*S/(C*(R*S+1-S)))/(1-exp(-Pei))-H)*(1-exp(-(Pei*(1-S))/(R*S+1-S)))=1;

(2)
> 

plot({lhs(A3),rhs(A3)},S=0..1,color=[red,black],thickness=2);

 
> 

eqn3:=solve(A3,S);

(3)
> 

fsolve(A3,S=0..1);

(4)
> 

 

The plot shows that the equation has two roots for the given data but the two commands (solve and fsolve) does not show the second root.

PLease help me to solve the problem.

Thanks.

Download test1.mws
Please Wait...