Go to the source code of this file.
Functions | |
doublereal | cqrt17_ (char *trans, integer *iresid, integer *m, integer *n, integer *nrhs, complex *a, integer *lda, complex *x, integer *ldx, complex *b, integer *ldb, complex *c__, complex *work, integer *lwork) |
Variables | |
static integer | c__0 = 0 |
static integer | c__1 = 1 |
static integer | c__13 = 13 |
static complex | c_b13 = {-1.f,0.f} |
static complex | c_b14 = {1.f,0.f} |
static real | c_b19 = 1.f |
static complex | c_b22 = {0.f,0.f} |