Mercurial > octave-antonio
diff scripts/linear-algebra/qzhess.m @ 2312:204cc7db6f4a
[project @ 1996-07-11 21:20:36 by jwe]
author | jwe |
---|---|
date | Thu, 11 Jul 1996 21:20:36 +0000 |
parents | 2b5788792cad |
children | 5ca126254d15 |
line wrap: on
line diff
--- a/scripts/linear-algebra/qzhess.m Thu Jul 11 20:18:38 1996 +0000 +++ b/scripts/linear-algebra/qzhess.m Thu Jul 11 21:20:36 1996 +0000 @@ -30,9 +30,11 @@ ## ## Algorithm taken from Golub and Van Loan, Matrix Computations, 2nd ed. -function [aa, bb, q, z] = qzhess (a, b) +## Author: A. S. Hodel <scotte@eng.auburn.edu> +## Created: August 1993 +## Adapted-By: jwe - ## Written by A. S. Hodel (scotte@eng.auburn.edu) August 1993. +function [aa, bb, q, z] = qzhess (a, b) if (nargin != 2) error ("usage: [aa, bb, q, z] = qzhess (a, b)");