
Go to the source code of this file.
Functions | |
| int | cqrt15_ (integer *scale, integer *rksel, integer *m, integer *n, integer *nrhs, complex *a, integer *lda, complex *b, integer *ldb, real *s, integer *rank, real *norma, real *normb, integer *iseed, complex *work, integer *lwork) |
Variables | |
| static integer | c__0 = 0 |
| static integer | c__1 = 1 |
| static integer | c__16 = 16 |
| static integer | c__2 = 2 |
| static complex | c_b1 = {0.f,0.f} |
| static complex | c_b2 = {1.f,0.f} |
| static complex | c_b22 = {2.f,0.f} |