Mercurial > repos > public > sbplib
view time.m @ 835:008496ca38f3 feature/burgers1d
Compute the residual in between each runge-kutta stage.
Note: It is not clear whether the correct residual is used when computing the stages. Must investigate further.
author | Vidar Stiernström <vidar.stiernstrom@it.uu.se> |
---|---|
date | Thu, 13 Sep 2018 18:14:54 +0200 |
parents | 305d8bb366ce |
children |
line wrap: on
line source
function t_out = time(f, n) default_arg('n',1); if n == 1 t = timeOnce(f); else t = timeAvg(f, n); end if nargout == 1 t_out = t; else fprintf('Elapsed time is %.6f seconds.\n', t) end end function t = timeOnce(f) s = tic(); f(); t = toc(s); end function t = timeAvg(f, n) s = tic(); for i = 1:n f(); end t = toc(s)/n; end