Defines |
#define | infoc_1 (infoc_._1) |
#define | infoc_2 (infoc_._2) |
#define | srnamc_1 srnamc_ |
Functions |
int | chkxer_ (char *srnamt, integer *infot, integer *nout, logical *lerr, logical *ok) |
logical | lse_ (real *ri, real *rj, integer *lr) |
logical | lseres_ (char *type__, char *uplo, integer *m, integer *n, real *aa, real *as, integer *lda, ftnlen type_len, ftnlen uplo_len) |
int | MAIN__ (void) |
doublereal | sbeg_ (logical *reset) |
int | sblat3_ () |
int | schk1_ (char *sname, real *eps, real *thresh, integer *nout, integer *ntra, logical *trace, logical *rewi, logical *fatal, integer *nidim, integer *idim, integer *nalf, real *alf, integer *nbet, real *bet, integer *nmax, real *a, real *aa, real *as, real *b, real *bb, real *bs, real *c__, real *cc, real *cs, real *ct, real *g, ftnlen sname_len) |
int | schk2_ (char *sname, real *eps, real *thresh, integer *nout, integer *ntra, logical *trace, logical *rewi, logical *fatal, integer *nidim, integer *idim, integer *nalf, real *alf, integer *nbet, real *bet, integer *nmax, real *a, real *aa, real *as, real *b, real *bb, real *bs, real *c__, real *cc, real *cs, real *ct, real *g, ftnlen sname_len) |
int | schk3_ (char *sname, real *eps, real *thresh, integer *nout, integer *ntra, logical *trace, logical *rewi, logical *fatal, integer *nidim, integer *idim, integer *nalf, real *alf, integer *nmax, real *a, real *aa, real *as, real *b, real *bb, real *bs, real *ct, real *g, real *c__, ftnlen sname_len) |
int | schk4_ (char *sname, real *eps, real *thresh, integer *nout, integer *ntra, logical *trace, logical *rewi, logical *fatal, integer *nidim, integer *idim, integer *nalf, real *alf, integer *nbet, real *bet, integer *nmax, real *a, real *aa, real *as, real *b, real *bb, real *bs, real *c__, real *cc, real *cs, real *ct, real *g, ftnlen sname_len) |
int | schk5_ (char *sname, real *eps, real *thresh, integer *nout, integer *ntra, logical *trace, logical *rewi, logical *fatal, integer *nidim, integer *idim, integer *nalf, real *alf, integer *nbet, real *bet, integer *nmax, real *ab, real *aa, real *as, real *bb, real *bs, real *c__, real *cc, real *cs, real *ct, real *g, real *w, ftnlen sname_len) |
int | schke_ (integer *isnum, char *srnamt, integer *nout, ftnlen srnamt_len) |
doublereal | sdiff_ (real *x, real *y) |
int | smake_ (char *type__, char *uplo, char *diag, integer *m, integer *n, real *a, integer *nmax, real *aa, integer *lda, logical *reset, real *transl, ftnlen type_len, ftnlen uplo_len, ftnlen diag_len) |
int | smmch_ (char *transa, char *transb, integer *m, integer *n, integer *kk, real *alpha, real *a, integer *lda, real *b, integer *ldb, real *beta, real *c__, integer *ldc, real *ct, real *g, real *cc, integer *ldcc, real *eps, real *err, logical *fatal, integer *nout, logical *mv, ftnlen transa_len, ftnlen transb_len) |
int | xerbla_ (char *srname, integer *info) |
Variables |
static integer | c__0 = 0 |
static integer | c__1 = 1 |
static integer | c__2 = 2 |
static integer | c__3 = 3 |
static integer | c__4 = 4 |
static integer | c__65 = 65 |
static integer | c__7 = 7 |
static integer | c__8 = 8 |
static integer | c__9 = 9 |
static real | c_b85 = 1.f |
static real | c_b99 = 0.f |
static logical | c_false = FALSE_ |
static integer | c_n1 = -1 |
static logical | c_true = TRUE_ |
union { |
struct { |
integer infot |
logical lerr |
integer noutc |
logical ok |
} _1 |
struct { |
integer infot |
logical lerr |
integer nout |
logical ok |
} _2 |
} | infoc_ |
struct { |
char srnamt [6] |
} | srnamc_ |