Mercurial > octave-nkf

diff scripts/general/cart2sph.m @ 6157:045038e0108a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-11-13 22:22:53 by jwe]
author jwe
date Mon, 13 Nov 2006 22:22:54 +0000
parents 34f96dd5441b
children 5ce6ecc1377b
line wrap: on
line diff
--- a/scripts/general/cart2sph.m	Mon Nov 13 19:20:23 2006 +0000
+++ b/scripts/general/cart2sph.m	Mon Nov 13 22:22:54 2006 +0000
@@ -37,8 +37,8 @@
   endif
 
   if ((! (ismatrix (X) && ismatrix (Y) && ismatrix (Z)))
-      || size (X) != size (Y)
-      || size (X) != size (Z))
+      || (! size_equal (X, Y))
+      || (! size_equal (X, Z))
     error ("cart2sph: arguments must be matrices of same size");
   endif