Fix misnaming of LAPACK_?ggsvp function prototypes as LAPACKE_
This commit is contained in:
parent
fb3d80c42a
commit
1a05523709
|
@ -3753,7 +3753,7 @@ void LAPACK_zggsvd3(
|
||||||
lapack_int* info );
|
lapack_int* info );
|
||||||
|
|
||||||
#define LAPACK_sggsvp LAPACK_GLOBAL(sggsvp,SGGSVP)
|
#define LAPACK_sggsvp LAPACK_GLOBAL(sggsvp,SGGSVP)
|
||||||
lapack_int LAPACKE_sggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
lapack_int LAPACK_sggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
||||||
lapack_int m, lapack_int p, lapack_int n, float* a,
|
lapack_int m, lapack_int p, lapack_int n, float* a,
|
||||||
lapack_int lda, float* b, lapack_int ldb, float tola,
|
lapack_int lda, float* b, lapack_int ldb, float tola,
|
||||||
float tolb, lapack_int* k, lapack_int* l, float* u,
|
float tolb, lapack_int* k, lapack_int* l, float* u,
|
||||||
|
@ -3761,7 +3761,7 @@ lapack_int LAPACKE_sggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
||||||
lapack_int ldq );
|
lapack_int ldq );
|
||||||
|
|
||||||
#define LAPACK_dggsvp LAPACK_GLOBAL(dggsvp,DGGSVP)
|
#define LAPACK_dggsvp LAPACK_GLOBAL(dggsvp,DGGSVP)
|
||||||
lapack_int LAPACKE_dggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
lapack_int LAPACK_dggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
||||||
lapack_int m, lapack_int p, lapack_int n, double* a,
|
lapack_int m, lapack_int p, lapack_int n, double* a,
|
||||||
lapack_int lda, double* b, lapack_int ldb,
|
lapack_int lda, double* b, lapack_int ldb,
|
||||||
double tola, double tolb, lapack_int* k,
|
double tola, double tolb, lapack_int* k,
|
||||||
|
@ -3769,7 +3769,7 @@ lapack_int LAPACKE_dggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
||||||
lapack_int ldv, double* q, lapack_int ldq );
|
lapack_int ldv, double* q, lapack_int ldq );
|
||||||
|
|
||||||
#define LAPACK_cggsvp LAPACK_GLOBAL(cggsvp,CGGSVP)
|
#define LAPACK_cggsvp LAPACK_GLOBAL(cggsvp,CGGSVP)
|
||||||
lapack_int LAPACKE_cggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
lapack_int LAPACK_cggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
||||||
lapack_int m, lapack_int p, lapack_int n,
|
lapack_int m, lapack_int p, lapack_int n,
|
||||||
lapack_complex_float* a, lapack_int lda,
|
lapack_complex_float* a, lapack_int lda,
|
||||||
lapack_complex_float* b, lapack_int ldb, float tola,
|
lapack_complex_float* b, lapack_int ldb, float tola,
|
||||||
|
@ -3779,7 +3779,7 @@ lapack_int LAPACKE_cggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
||||||
lapack_complex_float* q, lapack_int ldq );
|
lapack_complex_float* q, lapack_int ldq );
|
||||||
|
|
||||||
#define LAPACK_zggsvp LAPACK_GLOBAL(zggsvp,ZGGSVP)
|
#define LAPACK_zggsvp LAPACK_GLOBAL(zggsvp,ZGGSVP)
|
||||||
lapack_int LAPACKE_zggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
lapack_int LAPACK_zggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
||||||
lapack_int m, lapack_int p, lapack_int n,
|
lapack_int m, lapack_int p, lapack_int n,
|
||||||
lapack_complex_double* a, lapack_int lda,
|
lapack_complex_double* a, lapack_int lda,
|
||||||
lapack_complex_double* b, lapack_int ldb,
|
lapack_complex_double* b, lapack_int ldb,
|
||||||
|
|
Loading…
Reference in New Issue