Mercurial > octave
changeset 20928:2b8447888e0a
strip trailing whitespace from files
* md5sum.m, fileattrib.m, ode23.m, odeplot.m,
ode_struct_value_check.m, runge_kutta_23.m runge_kutta_interpolate.m:
Strip trailing whitespace.
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 17 Dec 2015 11:50:59 -0500 |
parents | 1da6c81e6486 |
children | 45a64a6c7273 |
files | scripts/deprecated/md5sum.m scripts/miscellaneous/fileattrib.m scripts/ode/ode23.m scripts/ode/odeplot.m scripts/ode/private/ode_struct_value_check.m scripts/ode/private/runge_kutta_23.m scripts/ode/private/runge_kutta_interpolate.m |
diffstat | 7 files changed, 15 insertions(+), 15 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/deprecated/md5sum.m Thu Dec 17 11:42:42 2015 -0500 +++ b/scripts/deprecated/md5sum.m Thu Dec 17 11:50:59 2015 -0500 @@ -35,7 +35,7 @@ ## @end example ## ## Calculate the MD5 sum of the file @var{file}. -## +## ## If the second parameter @var{opt} exists and is true, then calculate the MD5 ## sum of the string @var{str}. ##
--- a/scripts/miscellaneous/fileattrib.m Thu Dec 17 11:42:42 2015 -0500 +++ b/scripts/miscellaneous/fileattrib.m Thu Dec 17 11:50:59 2015 -0500 @@ -97,7 +97,7 @@ r(i).system = NaN; r(i).hidden = NaN; else - [~, attrib] = dos (sprintf ('attrib "%s"', r(i).Name)); + [~, attrib] = dos (sprintf ('attrib "%s"', r(i).Name)); ## dos() never returns error status so have to check it indirectly if (length (attrib) < 12 || ! strcmp (deblank (attrib(12:end)), r(i).Name)) @@ -151,7 +151,7 @@ %!test -%! [status, attr] = fileattrib (P_tmpdir ()); +%! [status, attr] = fileattrib (P_tmpdir ()); %! assert (status); %! assert (isstruct (attr)); %! assert (numel (fieldnames (attr)), 14);
--- a/scripts/ode/ode23.m Thu Dec 17 11:42:42 2015 -0500 +++ b/scripts/ode/ode23.m Thu Dec 17 11:50:59 2015 -0500 @@ -108,7 +108,7 @@ order = 3; solver = "ode23"; - + if (nargin >= 4) if (! isstruct (varargin{1})) ## varargin{1:len} are parameters for fun @@ -222,7 +222,7 @@ ["ode23: option \"NonNegative\" is ignored", ... " when mass matrix is set\n"]); endif - else + else odeopts.havenonnegative = false; endif @@ -237,7 +237,7 @@ if (odeopts.Refine > 0) odeopts.haverefine = true; - else + else odeopts.haverefine = false; endif @@ -313,7 +313,7 @@ endif ## Starting the initialisation of the core solver ode23 - + if (havemasshandle) # Handle only the dynamic mass matrix, if (massdependence) # constant mass matrices have already mass = @(t,x) odeopts.Mass (t, x, odeopts.funarguments{:});
--- a/scripts/ode/odeplot.m Thu Dec 17 11:42:42 2015 -0500 +++ b/scripts/ode/odeplot.m Thu Dec 17 11:50:59 2015 -0500 @@ -36,7 +36,7 @@ %# For example, solve an anonymous implementation of the "Van der Pol" equation and display the results while solving %# @example %# fvdb = @@(t,y) [y(2); (1 - y(1)^2) * y(2) - y(1)]; -%# +%# %# opt = odeset ("OutputFcn", @@odeplot, "RelTol", 1e-6); %# sol = ode45 (fvdb, [0 20], [2 0], opt); %# @end example @@ -47,10 +47,10 @@ function [varargout] = odeplot (t, y, flag, varargin) ## No input argument check is done for a higher processing speed - persistent fig; persistent told; + persistent fig; persistent told; persistent yold; persistent counter; - if (strcmp (flag, "init")) + if (strcmp (flag, "init")) ## Nothing to return, t is either the time slot [tstart tstop] ## or [t0, t1, ..., tn], y is the inital value vector "init" fig = figure; told = t(1,1); yold = y(:,1); @@ -65,7 +65,7 @@ plot (told, yold, "-o", "markersize", 1); drawnow; varargout{1} = false; - elseif (strcmp (flag, "done")) + elseif (strcmp (flag, "done")) ## Cleanup has to be done, clear the persistent variables because ## we don't need them anymore clear ("figure", "told", "yold", "counter");
--- a/scripts/ode/private/ode_struct_value_check.m Thu Dec 17 11:42:42 2015 -0500 +++ b/scripts/ode/private/ode_struct_value_check.m Thu Dec 17 11:50:59 2015 -0500 @@ -258,7 +258,7 @@ [caller ": invalid value assigned to field '%s'"], opt); endif endif - + case "TimeStepNumber" if (! isempty (val)) if (! isscalar (val))
--- a/scripts/ode/private/runge_kutta_23.m Thu Dec 17 11:42:42 2015 -0500 +++ b/scripts/ode/private/runge_kutta_23.m Thu Dec 17 11:50:59 2015 -0500 @@ -82,7 +82,7 @@ else args = {}; endif - + if (! isempty (k_vals)) # k values from previous step are passed k(:,1) = k_vals(:,end); # FSAL property else @@ -91,7 +91,7 @@ k(:,2) = feval (f, s(2), x + k(:,1) * aa(2, 1).', args{:}); k(:,3) = feval (f, s(3), x + k(:,2) * aa(3, 2).', args{:}); - + ## compute new time and new values for the unkwnowns ## t_next = t + dt; x_next = x + k(:,1:3) * cc(:); # 3rd order approximation
--- a/scripts/ode/private/runge_kutta_interpolate.m Thu Dec 17 11:42:42 2015 -0500 +++ b/scripts/ode/private/runge_kutta_interpolate.m Thu Dec 17 11:50:59 2015 -0500 @@ -126,5 +126,5 @@ (s .* (1-s).^2 * dt ) .* der(:,1) + ... ((3-2*s) .* s.^2 ) .* x(:,2) + ... ((s-1) .* s.^2 * dt ) .* der(:,2); - + endfunction