Re: Iterative solution difficulty
- To: mathgroup at smc.vnet.net
- Subject: [mg100104] Re: Iterative solution difficulty
- From: James <jborrell at umd.edu>
- Date: Mon, 25 May 2009 06:14:01 -0400 (EDT)
I think this better explains what I want to do.
EOM = x''[t] + 10 Sin[x[t]];
Do[sol[n]=NDSolve[{EOM ==0,x[0]==Pi/2,x'[0]==0},{x},{t,0,1}],{n,1,2}]
I want the time at iteration, n=1 to be from t=0 -> t=tf (which is found with EventLocator based on a stopping condition).
Then the initial conditions change, for iteration n=2, by some function x[0],x'[0]=f(x[tf])) and the time goes from tf->ts (found with EventLocator).