Mercurial > hg > octave-lyh

diff scripts/general/curl.m @ 12173:dd2af7b8dafe

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
curl: simplify processing of output values
author John W. Eaton <jwe@octave.org>
date Wed, 26 Jan 2011 23:15:59 -0500
parents b0084095098e
children 515446c8fe23
line wrap: on
line diff
--- a/scripts/general/curl.m
+++ b/scripts/general/curl.m
@@ -88,9 +88,7 @@
     dFy_dx = gradient (varargin{fidx + 1}, dx, dy);
     rot_z = dFy_dx - dFx_dy;
     av = rot_z / 2;
-    if (nargout == 0)
-      av
-    elseif (nargout == 1)
+    if (nargout == 0 || nargout == 1)
       varargout{1} = av;
     elseif (nargout == 2)
       varargout{1} = rot_z;
@@ -121,18 +119,9 @@
           rot_y .* varargin{fidx + 1} +
           rot_z .* varargin{fidx + 2}) ./ (2 * l);
 
-    if (nargout == 0)
-      varargout{1} = av;
-    elseif (nargout == 1)
+    if (nargout == 0 || nargout == 1)
       varargout{1} = av;
-    elseif (nargout == 2)
-      varargout{1} = rot_x;
-      varargout{2} = rot_y;
-    elseif (nargout == 3)
-      varargout{1} = rot_x;
-      varargout{2} = rot_y;
-      varargout{3} = rot_z;
-    elseif (nargout == 4)
+    else
       varargout{1} = rot_x;
       varargout{2} = rot_y;
       varargout{3} = rot_z;