Mercurial > octave-nkf
diff scripts/general/sph2cart.m @ 4030:22bd65326ec1
[project @ 2002-08-09 18:58:13 by jwe]
author | jwe |
---|---|
date | Fri, 09 Aug 2002 19:00:16 +0000 |
parents | 63c75bc3db82 |
children | c08cb1098afc |
line wrap: on
line diff
--- a/scripts/general/sph2cart.m Fri Aug 09 07:38:55 2002 +0000 +++ b/scripts/general/sph2cart.m Fri Aug 09 19:00:16 2002 +0000 @@ -36,7 +36,7 @@ usage ("[X, Y, Z] = sph2cart (Theta, Phi, R)"); endif - if ((! (is_matrix (Theta) && is_matrix (Phi) && is_matrix (R))) + if ((! (ismatrix (Theta) && ismatrix (Phi) && ismatrix (R))) || size (Theta) != size (Phi) || size (Theta) != size (R)) error ("sph2cart: arguments must be matrices of same size");