Mercurial > octave-nkf

comparison scripts/plot/surface.m @ 7292:5e90111a28b3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-12-11 18:13:34 by jwe]
author jwe
date Tue, 11 Dec 2007 18:15:06 +0000
parents a239de118fa6
children d45fc511fc5d
comparison
equal deleted inserted replaced
7291:de593fd63ecf 7292:5e90111a28b3
90 y = y(:); 90 y = y(:);
91 else 91 else
92 error ("surface: rows (z) must be the same as length (y) and columns (z) must be the same as length (x)"); 92 error ("surface: rows (z) must be the same as length (y) and columns (z) must be the same as length (x)");
93 endif 93 endif
94 elseif (ismatrix (x) && ismatrix (y) && ismatrix (z)) 94 elseif (ismatrix (x) && ismatrix (y) && ismatrix (z))
95 if (! (size_equal (x, y) && size_equal (x, z))) 95 if (! size_equal (x, y, z))
96 error ("surface: x, y, and z must have same dimensions"); 96 error ("surface: x, y, and z must have same dimensions");
97 endif 97 endif
98 else 98 else
99 error ("surface: x and y must be vectors and z must be a matrix"); 99 error ("surface: x and y must be vectors and z must be a matrix");
100 endif 100 endif
109 y = y(:); 109 y = y(:);
110 else 110 else
111 error ("surface: rows (z) must be the same as length (y) and columns (z) must be the same as length (x)"); 111 error ("surface: rows (z) must be the same as length (y) and columns (z) must be the same as length (x)");
112 endif 112 endif
113 elseif (ismatrix (x) && ismatrix (y) && ismatrix (z)) 113 elseif (ismatrix (x) && ismatrix (y) && ismatrix (z))
114 if (! (size_equal (x, y) && size_equal (x, z))) 114 if (! size_equal (x, y, z))
115 error ("surface: x, y, and z must have same dimensions"); 115 error ("surface: x, y, and z must have same dimensions");
116 endif 116 endif
117 else 117 else
118 error ("surface: x and y must be vectors and z must be a matrix"); 118 error ("surface: x and y must be vectors and z must be a matrix");
119 endif 119 endif