Mercurial > hg > octave-lyh

comparison scripts/plot/mesh.m @ 6156:a46f14cdbecd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-11-13 19:20:23 by jwe]
author jwe
date Mon, 13 Nov 2006 19:20:23 +0000
parents 08f0dabf17b9
children 57aeb18f161d
comparison
equal deleted inserted replaced
6155:ab5008998876 6156:a46f14cdbecd
48 msg = "mesh: rows (z) must be the same as length (y) and"; 48 msg = "mesh: rows (z) must be the same as length (y) and";
49 msg = sprintf ("%s\ncolumns (z) must be the same as length (x)", msg); 49 msg = sprintf ("%s\ncolumns (z) must be the same as length (x)", msg);
50 error (msg); 50 error (msg);
51 endif 51 endif
52 elseif (ismatrix (x) && ismatrix (y) && ismatrix (z)) 52 elseif (ismatrix (x) && ismatrix (y) && ismatrix (z))
53 if (ndims (x) != ndims (y) || ndims (x) != ndims (z) 53 if (! (size_equal (x, y) && size_equal (x, z)))
54 || size (x) != size (y) || size (x) != size (z))
55 error ("mesh: x, y, and z must have same dimensions"); 54 error ("mesh: x, y, and z must have same dimensions");
56 endif 55 endif
57 else 56 else
58 error ("mesh: x and y must be vectors and z must be a matrix"); 57 error ("mesh: x and y must be vectors and z must be a matrix");
59 endif 58 endif