Mercurial > hg > octave-lyh

changeset 71:ca37b3c9d066

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1993-08-30 14:39:54 by jwe]
author jwe
date Mon, 30 Aug 1993 14:39:54 +0000
parents a5e8b7c9a3ad
children 2d480148756b
files scripts/control/tzero.m
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/control/tzero.m
+++ b/scripts/control/tzero.m
@@ -1,11 +1,15 @@
 function zr = tzero (a, b, c, d, bal)
 
+# Usage: zr = tzero (a, b, c, d, bal)
+#
 # Compute the transmission zeros of a, b, c, d.
 #
 # bal = balancing option (see balance); default is "B".
 #
 # Needs to incorporate mvzero algorithm to isolate finite zeros.
 
+# Written by A. S. Hodel (scotte@eng.auburn.edu) August 1993
+
   if (nargin == 4)
     bal = "B";
   elseif (nargin ~= 5)