Mercurial > hg > octave-nkf
diff scripts/general/curl.m @ 11472:1740012184f9
Use uppercase for variable names in error() strings to match Info documentation. Only m-files done.
author | Rik <octave@nomad.inbox5.com> |
---|---|
date | Sun, 09 Jan 2011 21:33:04 -0800 |
parents | 13f128bd6a6f |
children | fd0a3ac60b0e |
line wrap: on
line diff
--- a/scripts/general/curl.m +++ b/scripts/general/curl.m @@ -76,12 +76,12 @@ if ((nargin == 4) || (nargin == 2)) if (!size_equal (varargin{fidx}, varargin{fidx + 1})) - error ("curl: size of x and y must match."); + error ("curl: size of X and Y must match."); elseif (ndims (varargin{fidx}) != 2) - error ("curl: expected two-dimensional matrices x and y."); + error ("curl: expected two-dimensional matrices X and Y."); elseif ((length (dx) != columns (varargin{fidx})) || (length (dy) != rows (varargin{fidx}))) - error ("curl: size of dx and dy must match the respective dimension of x and y"); + error ("curl: size of dx and dy must match the respective dimension of X and Y"); endif dFx_dy = gradient (varargin{fidx}.', dy, dx).'; @@ -101,13 +101,13 @@ elseif ((nargin == 6) || (nargin == 3)) if (!size_equal (varargin{fidx}, varargin{fidx + 1}, varargin{fidx + 2})) - error ("curl: size of x, y, and z must match") + error ("curl: size of X, Y, and Z must match") elseif (ndims (varargin{fidx}) != 3) - error ("curl: expected two-dimensional matrices x, y, and z."); + error ("curl: expected two-dimensional matrices X, Y, and Z."); elseif ((length (dx) != size (varargin{fidx}, 2)) || (length (dy) != size (varargin{fidx}, 1)) || (length (dz) != size (varargin{fidx}, 3))) - error ("curl: size of dx, dy, and dz must match the respective dimesion of x, y, and z."); + error ("curl: size of dx, dy, and dz must match the respective dimesion of X, Y, and Z."); endif [~, dFx_dy, dFx_dz] = gradient (varargin{fidx}, dx, dy, dz);