Mercurial > octave-nkf
comparison scripts/ode/private/integrate_const.m @ 20639:a260a6acb70f
fix test failures introduced by a22d8a2eb0e5
* scripts/ode/private/integrate_adaptive.m: fix stepping backwards, fix
invocation of OutputFcn, fix text of some error messages
* scripts/ode/private/integrate_const.m: remove use of option OutputSave
* scripts/ode/private/integrate_n_steps.m: remove use of option OutputSave
author | Carlo de Falco <carlo.defalco@polimi.it> |
---|---|
date | Sun, 11 Oct 2015 23:09:01 +0200 |
parents | b7ac1e94266e |
children |
comparison
equal
deleted
inserted
replaced
20638:d30fc2c11455 | 20639:a260a6acb70f |
---|---|
178 endif | 178 endif |
179 | 179 |
180 endwhile | 180 endwhile |
181 endif | 181 endif |
182 | 182 |
183 if (mod (solution.vcntloop-1, options.OutputSave) == 0) | 183 |
184 x = [x,u(:,2:end)]; | 184 x = [x,u(:,2:end)]; |
185 t = [t;z(2:end)]; | 185 t = [t;z(2:end)]; |
186 solution.vcntsave = solution.vcntsave + 1; | 186 solution.vcntsave = solution.vcntsave + 1; |
187 endif | |
188 solution.vcntloop = solution.vcntloop + 1; | 187 solution.vcntloop = solution.vcntloop + 1; |
189 vcntiter = 0; | 188 vcntiter = 0; |
190 | 189 |
191 ## Call plot only if a valid result has been found, therefore this | 190 ## Call plot only if a valid result has been found, therefore this |
192 ## code fragment has moved here. Stop integration if plot function | 191 ## code fragment has moved here. Stop integration if plot function |