Mercurial > octave-nkf
diff liboctave/dbleQR.h @ 1921:ce0db0ca0729
[project @ 1996-02-11 02:31:58 by jwe]
author | jwe |
---|---|
date | Sun, 11 Feb 1996 02:31:58 +0000 |
parents | 950825cea083 |
children | e379c781ae7e |
line wrap: on
line diff
--- a/liboctave/dbleQR.h Sun Feb 11 02:23:22 1996 +0000 +++ b/liboctave/dbleQR.h Sun Feb 11 02:31:58 1996 +0000 @@ -44,7 +44,7 @@ economy, }; - QR (void) : q (), r () { } + QR (void) : q (), r (), tau (0), work (0), tmp_data (0) { } QR (const Matrix& A, type qr_type = QR::std); @@ -60,6 +60,13 @@ return *this; } + ~QR (void) + { + delete [] tau; + delete [] work; + delete [] tmp_data; + } + Matrix Q (void) const { return q; } Matrix R (void) const { return r; } @@ -70,6 +77,10 @@ Matrix q; Matrix r; + + double *tau; + double *work; + double *tmp_data; }; #endif