Mercurial > hg > octave-terminal
changeset 71:ca37b3c9d066
[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)