From 5b2eb7926a7e1c7908b6e7d2c20b462edb7e5f77 Mon Sep 17 00:00:00 2001 From: Kai Luo Date: Mon, 27 Oct 2025 19:42:59 +0800 Subject: [PATCH 1/2] Fix: remove rwork from ssyevx function declaration --- source/source_base/module_container/base/third_party/lapack.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/source/source_base/module_container/base/third_party/lapack.h b/source/source_base/module_container/base/third_party/lapack.h index bfb19eaca4..8ab0ecab6f 100644 --- a/source/source_base/module_container/base/third_party/lapack.h +++ b/source/source_base/module_container/base/third_party/lapack.h @@ -110,7 +110,7 @@ void ssyevx_(const char* jobz, const char* range, const char* uplo, const int* n float* a, const int* lda, const float* vl, const float* vu, const int* il, const int* iu, const float* abstol, int* m, float* w, float* z, const int* ldz, - float* work, const int* lwork, float* rwork, int* iwork, int* ifail, int* info); + float* work, const int* lwork, int* iwork, int* ifail, int* info); void dsyevx_(const char* jobz, const char* range, const char* uplo, const int* n, double* a, const int* lda, From b0cf071e2a871b9ed793288b7932d86cdb9162a7 Mon Sep 17 00:00:00 2001 From: Kai Luo Date: Mon, 27 Oct 2025 19:53:51 +0800 Subject: [PATCH 2/2] Fix: remove rwork parameter from heevx function call --- source/source_base/module_container/base/third_party/lapack.h | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/source/source_base/module_container/base/third_party/lapack.h b/source/source_base/module_container/base/third_party/lapack.h index 8ab0ecab6f..9538761734 100644 --- a/source/source_base/module_container/base/third_party/lapack.h +++ b/source/source_base/module_container/base/third_party/lapack.h @@ -338,7 +338,7 @@ void heevx(const char jobz, const char range, const char uplo, const int n, ssyevx_(&jobz, &range, &uplo, &n, a, &lda, &vl, &vu, &il, &iu, &abstol, &m, w, z, &ldz, - work, &lwork, rwork, iwork, ifail, &info); + work, &lwork, iwork, ifail, &info); } // wrap function of fortran lapack routine zheevx. static inline