41 char* equed,
double* r,
double* c,
44 double* rcond,
double* rpvgrw,
double* berr,
53 LAPACK_zgbsvxx( &fact, &trans, &n, &kl, &ku, &nrhs, ab, &ldab, afb,
54 &ldafb, ipiv, equed, r, c, b, &ldb, x, &ldx, rcond,
55 rpvgrw, berr, &n_err_bnds, err_bnds_norm, err_bnds_comp,
56 &nparams, params, work, rwork, &info );
69 double* err_bnds_norm_t = NULL;
70 double* err_bnds_comp_t = NULL;
101 ldafb_t *
MAX(1,n) );
102 if( afb_t == NULL ) {
108 ldb_t *
MAX(1,nrhs) );
115 ldx_t *
MAX(1,nrhs) );
120 err_bnds_norm_t = (
double*)
122 if( err_bnds_norm_t == NULL ) {
126 err_bnds_comp_t = (
double*)
128 if( err_bnds_comp_t == NULL ) {
140 LAPACK_zgbsvxx( &fact, &trans, &n, &kl, &ku, &nrhs, ab_t, &ldab_t,
141 afb_t, &ldafb_t, ipiv, equed, r, c, b_t, &ldb_t, x_t,
142 &ldx_t, rcond, rpvgrw, berr, &n_err_bnds,
143 err_bnds_norm_t, err_bnds_comp_t, &nparams, params,
144 work, rwork, &info );
156 ldafb_t, afb, ldafb );
164 nrhs, err_bnds_norm, n_err_bnds );
166 nrhs, err_bnds_comp, n_err_bnds );
void LAPACKE_dge_trans(int matrix_layout, lapack_int m, lapack_int n, const double *in, lapack_int ldin, double *out, lapack_int ldout)
#define lapack_complex_double
void LAPACKE_zgb_trans(int matrix_layout, lapack_int m, lapack_int n, lapack_int kl, lapack_int ku, const lapack_complex_double *in, lapack_int ldin, lapack_complex_double *out, lapack_int ldout)
#define LAPACKE_malloc(size)
lapack_logical LAPACKE_lsame(char ca, char cb)
lapack_int LAPACKE_zgbsvxx_work(int matrix_layout, char fact, char trans, lapack_int n, lapack_int kl, lapack_int ku, lapack_int nrhs, lapack_complex_double *ab, lapack_int ldab, lapack_complex_double *afb, lapack_int ldafb, lapack_int *ipiv, char *equed, double *r, double *c, lapack_complex_double *b, lapack_int ldb, lapack_complex_double *x, lapack_int ldx, double *rcond, double *rpvgrw, double *berr, lapack_int n_err_bnds, double *err_bnds_norm, double *err_bnds_comp, lapack_int nparams, double *params, lapack_complex_double *work, double *rwork)
void LAPACKE_xerbla(const char *name, lapack_int info)
#define LAPACK_TRANSPOSE_MEMORY_ERROR
void LAPACKE_zge_trans(int matrix_layout, lapack_int m, lapack_int n, const lapack_complex_double *in, lapack_int ldin, lapack_complex_double *out, lapack_int ldout)
void LAPACK_zgbsvxx(char *fact, char *trans, lapack_int *n, lapack_int *kl, lapack_int *ku, lapack_int *nrhs, lapack_complex_double *ab, lapack_int *ldab, lapack_complex_double *afb, lapack_int *ldafb, lapack_int *ipiv, char *equed, double *r, double *c, lapack_complex_double *b, lapack_int *ldb, lapack_complex_double *x, lapack_int *ldx, double *rcond, double *rpvgrw, double *berr, lapack_int *n_err_bnds, double *err_bnds_norm, double *err_bnds_comp, lapack_int *nparams, double *params, lapack_complex_double *work, double *rwork, lapack_int *info)