# HG changeset patch
# User jwe
# Date 1185211695 0
# Node ID bb5958d3510a583c99116b0d088edebc7e1545d6
# Parent  5ce6ecc1377b95e4bcde8223eae3b9ad9493ea4a
[project @ 2007-07-23 17:28:15 by jwe]

diff -r 5ce6ecc1377b -r bb5958d3510a scripts/general/cart2pol.m
--- a/scripts/general/cart2pol.m	Mon Jul 23 17:00:55 2007 +0000
+++ b/scripts/general/cart2pol.m	Mon Jul 23 17:28:15 2007 +0000
@@ -40,9 +40,9 @@
     error ("cart2pol: number of output arguments must not be greater than number of input arguments");
   endif
 
-  if ((! (ismatrix (X) && ismatrix (Y)))
-      || (! size_equal (X, Y))
-      || (nargin == 3 && (! (size (X) == size (Z) && ismatrix (Z)))))
+  if (! (ismatrix (X) && ismatrix (Y))
+      || ! size_equal (X, Y)
+      || (nargin == 3 && ! (size_equal (X, Z) && ismatrix (Z))))
     error ("cart2pol: arguments must be matrices of same size");
   endif
 
diff -r 5ce6ecc1377b -r bb5958d3510a scripts/general/cart2sph.m
--- a/scripts/general/cart2sph.m	Mon Jul 23 17:00:55 2007 +0000
+++ b/scripts/general/cart2sph.m	Mon Jul 23 17:28:15 2007 +0000
@@ -36,9 +36,9 @@
     print_usage ();
   endif
 
-  if ((! (ismatrix (X) && ismatrix (Y) && ismatrix (Z)))
-      || (! size_equal (X, Y))
-      || (! size_equal (X, Z)))
+  if (! (ismatrix (X) && ismatrix (Y) && ismatrix (Z))
+      || ! size_equal (X, Y)
+      || ! size_equal (X, Z))
     error ("cart2sph: arguments must be matrices of same size");
   endif