# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1296101759 18000
# Node ID 1f14586af94cafe160b250c0a19fd50eb02327cb
# Parent  6a82092ffaeadda5b6732599c93bf15499cd5b09
curl: simplify processing of output values

diff -r 6a82092ffaea -r 1f14586af94c scripts/ChangeLog
--- a/scripts/ChangeLog	Wed Jan 26 20:44:58 2011 -0500
+++ b/scripts/ChangeLog	Wed Jan 26 23:15:59 2011 -0500
@@ -1,3 +1,7 @@
+2011-01-26  John W. Eaton  <jwe@octave.org>
+
+	* general/curl.m: Simplify processing of outptut values.
+
 2011-01-26  Olaf Till  <olaf.till@uni-jena.de>
 
 	* pkg/pkg.m: Export environment variables MKOCTFILE and
diff -r 6a82092ffaea -r 1f14586af94c scripts/general/curl.m
--- a/scripts/general/curl.m	Wed Jan 26 20:44:58 2011 -0500
+++ b/scripts/general/curl.m	Wed Jan 26 23:15:59 2011 -0500
@@ -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;