Mercurial > hg > octave-lyh

comparison scripts/plot/__patch__.m @ 7295:e00828759d1b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-12-11 19:23:34 by jwe]
author jwe
date Tue, 11 Dec 2007 19:23:34 +0000
parents fb902b3b2a5d
children 1c7b3e1fda19
comparison
equal deleted inserted replaced
7294:fb902b3b2a5d 7295:e00828759d1b
45 y = varargin{2}; 45 y = varargin{2};
46 have_x = true; 46 have_x = true;
47 iarg += 2; 47 iarg += 2;
48 48
49 if (nargin > 3 && ndims (varargin{3}) == 2 && ndims (x) == 2 49 if (nargin > 3 && ndims (varargin{3}) == 2 && ndims (x) == 2
50 && isequal (size (varargin{3}), size (x))) 50 && size_equal(x, varargin{3}) && !ischar(varargin{3}))
51 z = varargin{3}; 51 z = varargin{3};
52 have_z = true; 52 have_z = true;
53 iarg++; 53 iarg++;
54 endif 54 endif
55 elseif (ischar (varargin{1}) 55 elseif (ischar (varargin{1})
56 && (strcmp (tolower (varargin{1}), "faces") 56 && (strcmp (tolower (varargin{1}), "faces")
57 || trcmp (tolower (varargin{1}), "vertices"))) 57 || strcmp (tolower (varargin{1}), "vertices")))
58 if (! isnumeric (varargin{2})) 58 if (! isnumeric (varargin{2}))
59 fail = true; 59 fail = true;
60 return; 60 return;
61 endif 61 endif
62 62
179 cargs{2} = [0, 1, 0]; 179 cargs{2} = [0, 1, 0];
180 endif 180 endif
181 181
182 h = __go_patch__ (p, "xdata", x, "ydata", y, "faces", faces, 182 h = __go_patch__ (p, "xdata", x, "ydata", y, "faces", faces,
183 "vertices", vert, cargs{:}, varargin{iarg:end}); 183 "vertices", vert, cargs{:}, varargin{iarg:end});
184
185 if (have_z) 184 if (have_z)
186 set (h, "zdata", z); 185 set (h, "zdata", z);
187 endif 186 endif
188 187
189 endfunction 188 endfunction