Mercurial > hg > octave-nkf

comparison scripts/plot/mesh.m @ 3474:9c68cfa263eb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2000-01-25 10:17:55 by jwe]
author jwe
date Tue, 25 Jan 2000 10:17:56 +0000
parents f8dde1807dee
children c11d138d654a
comparison
equal deleted inserted replaced
3473:64f8babb7b3d 3474:9c68cfa263eb
74 gset parametric; 74 gset parametric;
75 gset view 60, 30, 1, 1 75 gset view 60, 30, 1, 1
76 gsplot (zz); 76 gsplot (zz);
77 gset noparametric; 77 gset noparametric;
78 else 78 else
79 msg = "mesh: rows (z) must be the same as length (x) and"; 79 msg = "mesh: rows (z) must be the same as length (y) and";
80 msg = sprintf ("%s\ncolumns (z) must be the same as length (y)", msg); 80 msg = sprintf ("%s\ncolumns (z) must be the same as length (x)", msg);
81 error (msg); 81 error (msg);
82 endif 82 endif
83 elseif (is_matrix (x) && is_matrix (y) && is_matrix (z)) 83 elseif (is_matrix (x) && is_matrix (y) && is_matrix (z))
84 xlen = columns (z); 84 xlen = columns (z);
85 ylen = rows (z); 85 ylen = rows (z);