void LAPACK_dspgst(lapack_int *itype, char *uplo, lapack_int *n, double *ap, const double *bp, lapack_int *info)
#define LAPACKE_malloc(size)
void LAPACKE_xerbla(const char *name, lapack_int info)
lapack_int LAPACKE_dspgst_work(int matrix_layout, lapack_int itype, char uplo, lapack_int n, double *ap, const double *bp)
void LAPACKE_dsp_trans(int matrix_layout, char uplo, lapack_int n, const double *in, double *out)
#define LAPACK_TRANSPOSE_MEMORY_ERROR