42 float* rcond,
float* ferr,
float* berr )
51 #ifndef LAPACK_DISABLE_NAN_CHECK
87 ldb, x, ldx, rcond, ferr, berr, work, rwork );
#define lapack_complex_float
lapack_logical LAPACKE_s_nancheck(lapack_int n, const float *x, lapack_int incx)
set ue cd $ADTTMP cat<< EOF > tmp f Program LinearEquations Implicit none Real b(3) integer i
lapack_logical LAPACKE_cge_nancheck(int matrix_order, lapack_int m, lapack_int n, const lapack_complex_float *a, lapack_int lda)
lapack_int LAPACKE_cptsvx_work(int matrix_order, char fact, lapack_int n, lapack_int nrhs, const float *d, const lapack_complex_float *e, float *df, lapack_complex_float *ef, const lapack_complex_float *b, lapack_int ldb, lapack_complex_float *x, lapack_int ldx, float *rcond, float *ferr, float *berr, lapack_complex_float *work, float *rwork)
#define LAPACKE_malloc(size)
lapack_logical LAPACKE_c_nancheck(lapack_int n, const lapack_complex_float *x, lapack_int incx)
lapack_logical LAPACKE_lsame(char ca, char cb)
#define LAPACK_WORK_MEMORY_ERROR
lapack_int LAPACKE_cptsvx(int matrix_order, char fact, lapack_int n, lapack_int nrhs, const float *d, const lapack_complex_float *e, float *df, lapack_complex_float *ef, const lapack_complex_float *b, lapack_int ldb, lapack_complex_float *x, lapack_int ldx, float *rcond, float *ferr, float *berr)
set ue cd $ADTTMP cat<< EOF > tmp c void LAPACKE_xerbla(const char *name, lapack_int info)