Mercurial > hg > octave-lyh
diff scripts/control/base/nyquist.m @ 5215:32c569794216
[project @ 2005-03-16 18:54:42 by jwe]
author | jwe |
---|---|
date | Wed, 16 Mar 2005 18:54:52 +0000 |
parents | bdbee5282954 |
children | 4c8a2e4e0717 |
line wrap: on
line diff
--- a/scripts/control/base/nyquist.m +++ b/scripts/control/base/nyquist.m @@ -135,10 +135,10 @@ dnplot = 0; while(!dnplot) oneplot(); - gset key; + __gnuplot_set__ key; clearplot(); grid ("on"); - gset data style lines; + __gnuplot_set__ data style lines; if(is_digital(sys)) tstr = " G(e^{jw}) "; @@ -154,7 +154,7 @@ inn{1}, outn{1}, w(1), w(length(w))) ) endif - gset nologscale xy; + __gnuplot_set__ nologscale xy; axis(axis2dlim([[vec(realp),vec(imagp)];[vec(realp),-vec(imagp)]])); plot(realp,imagp,"- ;+w;",realp,-imagp,"-@ ;-w;");