From 114c41e87150bfba39899127ec42286f211c1c7d Mon Sep 17 00:00:00 2001 From: btracey Date: Sun, 9 Aug 2015 23:17:03 -0600 Subject: [PATCH] Fix Gels to return singular result --- lapack64/lapack64.go | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lapack64/lapack64.go b/lapack64/lapack64.go index 685c2afa..8e9df7e7 100644 --- a/lapack64/lapack64.go +++ b/lapack64/lapack64.go @@ -77,8 +77,8 @@ func Potrf(a blas64.Symmetric) (t blas64.Triangular, ok bool) { // otherwise. A longer work will enable blocked algorithms to be called. // In the special case that lwork == -1, work[0] will be set to the optimal working // length. -func Gels(trans blas.Transpose, a blas64.General, b blas64.General, work []float64, lwork int) { - lapack64.Dgels(trans, a.Rows, a.Cols, b.Cols, a.Data, a.Stride, b.Data, b.Stride, work, lwork) +func Gels(trans blas.Transpose, a blas64.General, b blas64.General, work []float64, lwork int) bool { + return lapack64.Dgels(trans, a.Rows, a.Cols, b.Cols, a.Data, a.Stride, b.Data, b.Stride, work, lwork) } // Geqrf computes the QR factorization of the m×n matrix A using a blocked