Mercurial > hg > octave-nkf

comparison scripts/plot/shading.m @ 11587:c792872f8942

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
all script files: untabify and strip trailing whitespace
author John W. Eaton <jwe@octave.org>
date Thu, 20 Jan 2011 17:35:29 -0500
parents fd0a3ac60b0e
children 5ec6aa05638d
comparison
equal deleted inserted replaced
11586:12df7854fa7c 11587:c792872f8942
54 h2 = findobj (ax, "type", "surface"); 54 h2 = findobj (ax, "type", "surface");
55 55
56 obj = [h1(:); h2(:)]; 56 obj = [h1(:); h2(:)];
57 57
58 for n = 1:numel(obj) 58 for n = 1:numel(obj)
59 h = obj(n); 59 h = obj(n);
60 if (strcmpi (mode, "flat")) 60 if (strcmpi (mode, "flat"))
61 set (h, "facecolor", "flat"); 61 set (h, "facecolor", "flat");
62 set (h, "edgecolor", "none"); 62 set (h, "edgecolor", "none");
63 elseif (strcmpi (mode, "interp")) 63 elseif (strcmpi (mode, "interp"))
64 set (h, "facecolor", "interp"); 64 set (h, "facecolor", "interp");