diff scripts/control/system/zp2tf.m @ 7136:59dcf01bb3e3

[project @ 2007-11-08 20:18:25 by jwe]
author jwe
date Thu, 08 Nov 2007 20:18:26 +0000
parents f084ba47812b
children
line wrap: on
line diff
--- a/scripts/control/system/zp2tf.m	Thu Nov 08 18:54:10 2007 +0000
+++ b/scripts/control/system/zp2tf.m	Thu Nov 08 20:18:26 2007 +0000
@@ -49,7 +49,7 @@
 
   if (! (isvector (zer) || isempty (zer)))
     error ("zer(%dx%d) must be a vector", rz, cz);
-  elseif(! (isvector (pol) || isempty (pol)))
+  elseif (! (isvector (pol) || isempty (pol)))
     error ("pol(%dx%d) must be a vector", rp, cp);
   elseif (length (zer) > length (pol))
     error ("zer(%dx%d) longer than pol(%dx%d)", rz, cz, rp, cp);
@@ -57,12 +57,13 @@
 
   ## initialize converted polynomials
 
-  num = k;  den = 1;
+  num = k;
+  den = 1;
 
   ## call __zp2ssg2__ if there are complex conjugate pairs left, otherwise
   ## construct real zeros one by one.  Repeat for poles.
 
-  while(! isempty (zer))
+  while (! isempty (zer))
     if (max (abs (imag (zer))))
       [poly, zer] = __zp2ssg2__ (zer);
     else