From eee6a5920f89c2dc67bd1ec8db75df9ba95f3190 Mon Sep 17 00:00:00 2001 From: Erica Mitchell Date: Thu, 24 Oct 2024 17:06:41 -0400 Subject: [PATCH] Remove dgeqrf if/else --- src/madness/tensor/lapack.cc | 4 ---- 1 file changed, 4 deletions(-) diff --git a/src/madness/tensor/lapack.cc b/src/madness/tensor/lapack.cc index 16d96a19b69..05021b9a368 100644 --- a/src/madness/tensor/lapack.cc +++ b/src/madness/tensor/lapack.cc @@ -476,11 +476,7 @@ STATIC inline void geqrf_(integer *m, integer *n, STATIC inline void geqrf_(integer *m, integer *n, real8 *a, integer *lda, real8 *tau, real8 *work, integer *lwork, integer *infoOUT) { -#if MADNESS_LINALG_USE_LAPACKE - dgeqrf_(LAPACK_ROW_MAJOR, m, n, a, lda, tau, infoOUT); -#else dgeqrf_(m, n, a, lda, tau, work, lwork, infoOUT); -#endif } STATIC inline void geqrf_(integer *m, integer *n,