Mercurial > hg > octave-nkf

comparison scripts/plot/surface.m @ 7114:a67d30883ee0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-11-07 00:42:46 by dbateman]
author dbateman
date Wed, 07 Nov 2007 00:42:46 +0000
parents 0e63f1126f01
children c7e5e638a8d0
comparison
equal deleted inserted replaced
7113:a018c140f8aa 7114:a67d30883ee0
67 if (isvector (x) && isvector (y) && ismatrix (z)) 67 if (isvector (x) && isvector (y) && ismatrix (z))
68 if (rows (z) == length (y) && columns (z) == length (x)) 68 if (rows (z) == length (y) && columns (z) == length (x))
69 x = x(:)'; 69 x = x(:)';
70 y = y(:); 70 y = y(:);
71 else 71 else
72 error ("surface: rows (z) must be the same as length (y) and columns (z) must be the same as length (x)" 72 error ("surface: rows (z) must be the same as length (y) and columns (z) must be the same as length (x)");
73 endif 73 endif
74 elseif (ismatrix (x) && ismatrix (y) && ismatrix (z)) 74 elseif (ismatrix (x) && ismatrix (y) && ismatrix (z))
75 if (! (size_equal (x, y) && size_equal (x, z))) 75 if (! (size_equal (x, y) && size_equal (x, z)))
76 error ("surface: x, y, and z must have same dimensions"); 76 error ("surface: x, y, and z must have same dimensions");
77 endif 77 endif