Go to the source code of this file.
Functions | |
doublereal | zqrt12_ (integer *m, integer *n, doublecomplex *a, integer *lda, doublereal *s, doublecomplex *work, integer *lwork, doublereal *rwork) |
Variables | |
static integer | c__0 = 0 |
static integer | c__1 = 1 |
static integer | c__7 = 7 |
static doublereal | c_b33 = -1. |
static doublecomplex | c_b6 = {0.,0.} |
doublereal zqrt12_ | ( | integer * | m, |
integer * | n, | ||
doublecomplex * | a, | ||
integer * | lda, | ||
doublereal * | s, | ||
doublecomplex * | work, | ||
integer * | lwork, | ||
doublereal * | rwork | ||
) |
doublereal c_b33 = -1. [static] |
doublecomplex c_b6 = {0.,0.} [static] |