We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents e6364da + 0857ee1 commit 9270df8Copy full SHA for 9270df8
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
110
float* a, const int* lda,
111
const float* vl, const float* vu, const int* il, const int* iu,
112
const float* abstol, int* m, float* w, float* z, const int* ldz,
113
- float* work, const int* lwork, float* rwork, int* iwork, int* ifail, int* info);
+ float* work, const int* lwork, int* iwork, int* ifail, int* info);
114
115
void dsyevx_(const char* jobz, const char* range, const char* uplo, const int* n,
116
double* a, const int* lda,
@@ -338,7 +338,7 @@ void heevx(const char jobz, const char range, const char uplo, const int n,
338
ssyevx_(&jobz, &range, &uplo, &n,
339
a, &lda, &vl, &vu, &il, &iu,
340
&abstol, &m, w, z, &ldz,
341
- work, &lwork, rwork, iwork, ifail, &info);
+ work, &lwork, iwork, ifail, &info);
342
}
343
// wrap function of fortran lapack routine zheevx.
344
static inline
0 commit comments