void LAPACK_dsptri(char *uplo, lapack_int *n, double *ap, const lapack_int *ipiv, double *work, lapack_int *info)
#define LAPACKE_malloc(size)
lapack_int LAPACKE_dsptri_work(int matrix_layout, char uplo, lapack_int n, double *ap, const lapack_int *ipiv, double *work)
void LAPACKE_xerbla(const char *name, lapack_int info)
void LAPACKE_dsp_trans(int matrix_layout, char uplo, lapack_int n, const double *in, double *out)
#define LAPACK_TRANSPOSE_MEMORY_ERROR