Mercurial > octave-nkf
diff scripts/plot/surfc.m @ 7146:c7e5e638a8d0
[project @ 2007-11-09 17:49:44 by jwe]
author | jwe |
---|---|
date | Fri, 09 Nov 2007 17:51:42 +0000 |
parents | d32f867e4dda |
children | 9f38c6293317 |
line wrap: on
line diff
--- a/scripts/plot/surfc.m Fri Nov 09 17:43:07 2007 +0000 +++ b/scripts/plot/surfc.m Fri Nov 09 17:51:42 2007 +0000 @@ -37,9 +37,11 @@ set (tmp, "facecolor", "flat"); - set (ax, "view", [-37.5, 30]); + if (! ishold ()) + set (ax, "view", [-37.5, 30]); + endif - hold on; + hold ("on"); [c, lev] = contourc (varargin{:}); @@ -47,8 +49,8 @@ levx = linspace (min (lev), max (lev), size (cmap, 1)); - drawnow(); - ax = axis(); + drawnow (); + ax = axis (); zmin = 2 * ax(5) - ax(6); ## decode contourc output format @@ -71,4 +73,5 @@ if (nargout > 0) h = tmp; endif + endfunction