Question: solutions may have been lost

Hi ,everyone.When I entered the following code I got the error massage "Warning, solutions may have been lost." I want to solve x,how can I deal with this problem?Thanks a lot.

restart;
 p := 1730;
 r := .15;
mu := .17;
c := 120000;
k := 60000;
sigma := .2;
y := .89;
CI := 500000000;
with(Statistics);

F := int((x*exp(mu*t)*((y-1)*(cdf[normald[0, 1]]((ln((c+k)/x)-(mu+.5*sigma^2)*t)/(sigma*t^.5))-cdf[normald[0, 1]]((ln(c/x)-(mu+.5*sigma^2)*t)/(sigma*t^.5)))+(pdf[normald[0, 1]]((ln((c+k)/x)-(mu+.5*sigma^2)*t)/(sigma*t^.5))-pdf[normald[0, 1]]((ln(c/x)-(mu+.5*sigma^2)*t)/(sigma*t^.5)))/(sigma*t^.5))-c*(y*(cdf[normald[0, 1]]((ln((c+k)/x)-(mu-.5*sigma^2)*t)/(sigma*t^.5))-cdf[normald[0, 1]]((ln(c/x)-(mu-.5*sigma^2)*t)/(sigma*t^.5)))+(pdf[normald[0, 1]]((ln((c+k)/x)-(mu-.5*sigma^2)*t)/(sigma*t^.5))-pdf[normald[0, 1]]((ln(c/x)-(mu-.5*sigma^2)*t)/(sigma*t^.5)))/(sigma*t^.5))+k*(y(1-cdf[normald[0, 1]]((ln((c+k)/x)-(mu-.5*sigma^2)*t)/(sigma*t^.5)))-pdf[normald[0, 1]]((ln((c+k)/x)-(mu-.5*sigma^2)*t)/(sigma*t^.5))/(sigma*t^.5)))*exp(-r*t), t = 0 .. 40)-y*CI/p

 solve(F = 0, x);

The maple file as follow
View 10707_erro.mw on MapleNet or Download 10707_erro.mw
View file details

 

 

Please Wait...