Mercurial > octave
comparison scripts/ode/ode23.m @ 20902:73cf3434e8c9
Fix performance stats for ode23
* scripts/ode/ode23.m: Account for FSAL when computing number of function evaluations.
author | Carlo de Falco <carlo.defalco@polimi.it> |
---|---|
date | Tue, 15 Dec 2015 18:01:05 +0100 |
parents | afe9c529760d |
children | 0fb9de5b7903 |
comparison
equal
deleted
inserted
replaced
20901:afe9c529760d | 20902:73cf3434e8c9 |
---|---|
364 ## Print additional information if option Stats is set | 364 ## Print additional information if option Stats is set |
365 if (strcmp (odeopts.Stats, "on")) | 365 if (strcmp (odeopts.Stats, "on")) |
366 havestats = true; | 366 havestats = true; |
367 nsteps = solution.cntloop-2; # cntloop from 2..end | 367 nsteps = solution.cntloop-2; # cntloop from 2..end |
368 nfailed = (solution.cntcycles-1)-nsteps+1; # cntcycl from 1..end | 368 nfailed = (solution.cntcycles-1)-nsteps+1; # cntcycl from 1..end |
369 nfevals = 4 * (solution.cntcycles-1); # number of ode evaluations | 369 nfevals = 3 * (solution.cntcycles-1); # number of ode evaluations |
370 ndecomps = 0; # number of LU decompositions | 370 ndecomps = 0; # number of LU decompositions |
371 npds = 0; # number of partial derivatives | 371 npds = 0; # number of partial derivatives |
372 nlinsols = 0; # no. of solutions of linear systems | 372 nlinsols = 0; # no. of solutions of linear systems |
373 ## Print cost statistics if no output argument is given | 373 ## Print cost statistics if no output argument is given |
374 if (nargout == 0) | 374 if (nargout == 0) |