Mercurial > hg > octave-lyh
diff scripts/general/curl.m @ 11587:c792872f8942
all script files: untabify and strip trailing whitespace
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 20 Jan 2011 17:35:29 -0500 |
parents | d6619410e79c |
children | d5bd2766c640 |
line wrap: on
line diff
--- a/scripts/general/curl.m +++ b/scripts/general/curl.m @@ -23,7 +23,7 @@ ## @deftypefnx {Function File} {[@dots{}] =} curl (@var{fx}, @var{fy}) ## @deftypefnx {Function File} {@var{v} =} curl (@dots{}) ## Calculate curl of vector field given by the arrays @var{fx}, @var{fy}, and -## @var{fz} or @var{fx}, @var{fy} respectively. +## @var{fz} or @var{fx}, @var{fy} respectively. ## @tex ## $$ curl F(x,y,z) = \left( {\partial{d} \over \partial{y}} F_z - {\partial{d} \over \partial{z}} F_y, {\partial{d} \over \partial{z}} F_x - {\partial{d} \over \partial{x}} F_z, {\partial{d} \over \partial{x}} F_y - {\partial{d} \over \partial{y}} F_x \right)$$ ## @end tex @@ -73,7 +73,7 @@ else print_usage(); endif - + if ((nargin == 4) || (nargin == 2)) if (!size_equal (varargin{fidx}, varargin{fidx + 1})) error ("curl: size of X and Y must match.");