# HG changeset patch
# User jwe
# Date 1156360171 0
# Node ID dcd376102ac1cf39747e877601a7559368f72c97
# Parent  85c7dc4afe6b64db14e67cd97c2ba42070067d9e
[project @ 2006-08-23 19:09:30 by jwe]

diff -r 85c7dc4afe6b -r dcd376102ac1 scripts/ChangeLog
--- a/scripts/ChangeLog	Wed Aug 23 18:35:39 2006 +0000
+++ b/scripts/ChangeLog	Wed Aug 23 19:09:31 2006 +0000
@@ -1,3 +1,7 @@
+2006-08-23  Quentin Spencer  <qspencer@ieee.org>
+
+	* control/system/tf2zp.m: Simplify gain calculation.
+
 2006-08-23  John W. Eaton  <jwe@octave.org>
 
 	* plot/__plt__.m: Insert using clauses for all plots.
diff -r 85c7dc4afe6b -r dcd376102ac1 scripts/control/system/tf2zp.m
--- a/scripts/control/system/tf2zp.m	Wed Aug 23 18:35:39 2006 +0000
+++ b/scripts/control/system/tf2zp.m	Wed Aug 23 19:09:31 2006 +0000
@@ -43,10 +43,9 @@
       zer = [];
     endif
   else
-    error ("Incorrect number of input arguments");
+    print_usage ();
   endif
 
-  [a, b, c, d] = tf2ss (num, den);
-  [dum, k] = tzero (a, b, c, d);
+  k = num(1) / den(1);
 
 endfunction