Mercurial > hg > octave-nkf

diff liboctave/CmplxQRP.cc @ 567:01e026888dfb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1994-07-26 03:35:32 by jwe]
author jwe
date Tue, 26 Jul 1994 03:35:56 +0000
parents 8e134d3b21c9
children 714fd17fca28
line wrap: on
line diff
--- a/liboctave/CmplxQRP.cc
+++ b/liboctave/CmplxQRP.cc
@@ -40,6 +40,9 @@
 {
   int F77_FCN (zgeqpf) (const int*, const int*, Complex*, const int*,
 			int*, Complex*, Complex*, double*, int*);
+
+  int F77_FCN (zungqr) (const int*, const int*, const int*, Complex*,
+			const int*, Complex*, Complex*, const int*, int*);
 }
 
 // It would be best to share some of this code with ComplexQR class...