Mercurial > octave-nkf

diff scripts/control/base/nyquist.m @ 7126:4a375de63f66

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-11-08 03:44:14 by jwe]
author jwe
date Thu, 08 Nov 2007 03:44:15 +0000
parents a1dbe9d80eee
children
line wrap: on
line diff
--- a/scripts/control/base/nyquist.m	Thu Nov 08 02:29:24 2007 +0000
+++ b/scripts/control/base/nyquist.m	Thu Nov 08 03:44:15 2007 +0000
@@ -168,7 +168,7 @@
         th = atan2 (real (df), imag (df)) * 180 / pi;
 
         ## get angle at fmax
-        if (fi == length(f))
+        if (fi == length (f))
 	  fi = fi-1;
 	endif
         thm = th(fi);