Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- sol= ParametricNDSolve[{x''[t] + 2 d x'[t] + x[t] == 0, x[0] == 1,x'[0] ==0,
- WhenEvent[ x'[t] == 0.,tEvent = t; "StopIntegration" ,"DetectionMethod" -> "Interpolation"]}, x, {t, 0, 10}, {d }]
- x[.3] /. sol
- (* InterpolatingFunction[{{0., 3.29328}}, <>] *)
Add Comment
Please, Sign In to add comment