Re: NDSolve: Precision and Stability
- To: mathgroup at smc.vnet.net
- Subject: [mg42488] Re: NDSolve: Precision and Stability
- From: "Kevin J. McCann" <kjm@KevinMcCann>
- Date: Fri, 11 Jul 2003 02:57:50 -0400 (EDT)
- References: <beh277$qk2$1@smc.vnet.net> <bej612$5m8$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Bob, I got lots of error messages with your code - MaxSteps exceeded etc. The final plot looks correct by only goes to about x = 5. Kevin "Bob Hanlon" <bobhanlon at aol.com> wrote in message news:bej612$5m8$1 at smc.vnet.net... > Extend the working precision > > Result1=NDSolve[{-5-5x-V[x]-V'[x]+0.3V''[x]==0,V[0]==0,V'[0]==-5}, > V,{x,0,20}, WorkingPrecision->50]; > Plot[Evaluate[V[x]/.Result1],{x,0,20}]; > > > Bob Hanlon