Go to the source code of this file.
Functions | |
int | cchkgg_ (integer *nsizes, integer *nn, integer *ntypes, logical *dotype, integer *iseed, real *thresh, logical *tstdif, real *thrshn, integer *nounit, complex *a, integer *lda, complex *b, complex *h__, complex *t, complex *s1, complex *s2, complex *p1, complex *p2, complex *u, integer *ldu, complex *v, complex *q, complex *z__, complex *alpha1, complex *beta1, complex *alpha3, complex *beta3, complex *evectl, complex *evectr, complex *work, integer *lwork, real *rwork, logical *llwork, real *result, integer *info) |
Variables | |
static integer | c__1 = 1 |
static integer | c__2 = 2 |
static integer | c__3 = 3 |
static integer | c__4 = 4 |
static complex | c_b1 = {0.f,0.f} |
static real | c_b17 = 1.f |
static complex | c_b2 = {1.f,0.f} |
static logical | c_false = FALSE_ |
static logical | c_true = TRUE_ |
int cchkgg_ | ( | integer * | nsizes, |
integer * | nn, | ||
integer * | ntypes, | ||
logical * | dotype, | ||
integer * | iseed, | ||
real * | thresh, | ||
logical * | tstdif, | ||
real * | thrshn, | ||
integer * | nounit, | ||
complex * | a, | ||
integer * | lda, | ||
complex * | b, | ||
complex * | h__, | ||
complex * | t, | ||
complex * | s1, | ||
complex * | s2, | ||
complex * | p1, | ||
complex * | p2, | ||
complex * | u, | ||
integer * | ldu, | ||
complex * | v, | ||
complex * | q, | ||
complex * | z__, | ||
complex * | alpha1, | ||
complex * | beta1, | ||
complex * | alpha3, | ||
complex * | beta3, | ||
complex * | evectl, | ||
complex * | evectr, | ||
complex * | work, | ||
integer * | lwork, | ||
real * | rwork, | ||
logical * | llwork, | ||
real * | result, | ||
integer * | info | ||
) |