lapack_int LAPACKE_dtptri_work(int matrix_order, char uplo, char diag, lapack_int n, double *ap)
void LAPACKE_dtp_trans(int matrix_order, char uplo, char diag, lapack_int n, const double *in, double *out)
void LAPACK_dtptri(char *uplo, char *diag, lapack_int *n, double *ap, lapack_int *info)
#define LAPACKE_malloc(size)
#define LAPACK_TRANSPOSE_MEMORY_ERROR
set ue cd $ADTTMP cat<< EOF > tmp c void LAPACKE_xerbla(const char *name, lapack_int info)