# HG changeset patch # User Nicholas R. Jankowski # Date 1714716118 14400 # Node ID d10bed2b2cb4271aacbce483dc5fa32cae75e34c # Parent 6973c90d79e709124a50bfda1a3fdf9cb831959a# Parent 57bbf1e9b4deed2c7c0e09208f3346ca27ab9a34 maint: Merge default to bytecode interpreter. diff -r 6973c90d79e7 -r d10bed2b2cb4 scripts/ode/ode23s.m --- a/scripts/ode/ode23s.m Fri May 03 01:55:55 2024 -0400 +++ b/scripts/ode/ode23s.m Fri May 03 02:01:58 2024 -0400 @@ -277,9 +277,9 @@ %! ## Demo function: stiff Van Der Pol equation %! fcn = @(t,y) [y(2); 10*(1-y(1)^2)*y(2)-y(1)]; %! ## Calling ode23s method -%! tic () +%! tmr = tic (); %! [vt, vy] = ode23s (fcn, [0 20], [2 0]); -%! toc () +%! toc (tmr); %! ## Plotting the result %! plot (vt,vy(:,1),'-o'); @@ -289,9 +289,9 @@ %! ## Calling ode23s method %! odeopts = odeset ("Jacobian", @(t,y) [0 1; -20*y(1)*y(2)-1, 10*(1-y(1)^2)], %! "InitialStep", 1e-3) -%! tic () +%! tmr = tic (); %! [vt, vy] = ode23s (fcn, [0 20], [2 0], odeopts); -%! toc () +%! toc (tmr); %! ## Plotting the result %! plot (vt,vy(:,1),'-o'); @@ -300,9 +300,9 @@ %! fcn = @(t,y) [y(2); 100*(1-y(1)^2)*y(2)-y(1)]; %! ## Calling ode23s method %! odeopts = odeset ("InitialStep", 1e-4); -%! tic () +%! tmr = tic (); %! [vt, vy] = ode23s (fcn, [0 200], [2 0]); -%! toc () +%! toc (tmr); %! ## Plotting the result %! plot (vt,vy(:,1),'-o'); @@ -312,9 +312,9 @@ %! ## Calling ode23s method %! odeopts = odeset ("Jacobian", @(t,y) [0 1; -200*y(1)*y(2)-1, 100*(1-y(1)^2)], %! "InitialStep", 1e-4); -%! tic () +%! tmr = tic (); %! [vt, vy] = ode23s (fcn, [0 200], [2 0], odeopts); -%! toc () +%! toc (tmr); %! ## Plotting the result %! plot (vt,vy(:,1),'-o');