lapack.h

a software code for computing selected eigenvalues of large sparse symmetric matrices

void ctrexc(character *compq, integer *n, complex *t, integer *ldt, complex *q, integer *ldq, integer *ifst, integer *ilst, integer *info, ftnlen compqlen);
void ctrrfs(character *uplo, character *trans, character *diag, integer *n, integer *nrhs, complex *a, integer *lda, complex *b, integer *ldb, complex *x, integer *ldx, real *ferr, real *berr, complex *work, real *rwork, integer *info, ftnlen uplolen, ftnlen translen, ftnlen diaglen);
void ctrsen(character *job, character *compq, logical *select, integer *n, complex *t, integer *ldt, complex *q, integer *ldq, complex *w, integer *m, real *s, real *sep, complex *work, integer *lwork, integer *info, ftnlen joblen, ftnlen compqlen);
void ctrsna(character *job, character *howmny, logical *select, integer *n, complex *t, integer *ldt, complex *vl, integer *ldvl, complex *vr, integer *ldvr, real *s, real *sep, integer *mm, integer *m, complex *work, integer *ldwork, real *rwork, integer *info, ftnlen joblen, ftnlen howmnylen);
void ctrsyl(character *trana, character *tranb, integer *isgn, integer *m, integer *n, complex *a, integer *lda, complex *b, integer *ldb, complex *c, integer *ldc, real *scale, integer *info, ftnlen tranalen, ftnlen tranblen);
void ctrti2(character *uplo, character *diag, integer *n, complex *a, integer *lda, integer *info, ftnlen uplolen, ftnlen diaglen);
void ctrtri(character *uplo, character *diag, integer *n, complex *a, integer *lda, integer *info, ftnlen uplolen, ftnlen diaglen);
void ctrtrs(character *uplo, character *trans, character *diag, integer *n, integer *nrhs, complex *a, integer *lda, complex *b, integer *ldb, integer *info, ftnlen uplolen, ftnlen translen, ftnlen diaglen);
void ctzrqf(integer *m, integer *n, complex *a, integer *lda, complex *tau, integer *info);
void ctzrzf(integer *m, integer *n, complex *a, integer *lda, complex *tau, complex *work, integer *lwork, integer *info);
void cung2l(integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *work, integer *info);
void cung2r(integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *work, integer *info);
void cungbr(character *vect, integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *work, integer *lwork, integer *info, ftnlen vectlen);
void cunghr(integer *n, integer *ilo, integer *ihi, complex *a, integer *lda, complex *tau, complex *work, integer *lwork, integer *info);
void cungl2(integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *work, integer *info);
void cunglq(integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *work, integer *lwork, integer *info);
void cungql(integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *work, integer *lwork, integer *info);
void cungqr(integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *work, integer *lwork, integer *info);
void cungr2(integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *work, integer *info);
void cungrq(integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *work, integer *lwork, integer *info);
void cungtr(character *uplo, integer *n, complex *a, integer *lda, complex *tau, complex *work, integer *lwork, integer *info, ftnlen uplolen);
void cunm2l(character *side, character *trans, integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *info, ftnlen sidelen, ftnlen translen);
void cunm2r(character *side, character *trans, integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *info, ftnlen sidelen, ftnlen translen);
void cunmbr(character *vect, character *side, character *trans, integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *lwork, integer *info, ftnlen vectlen, ftnlen sidelen, ftnlen translen);
void cunmhr(character *side, character *trans, integer *m, integer *n, integer *ilo, integer *ihi, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *lwork, integer *info, ftnlen sidelen, ftnlen translen);
void cunml2(character *side, character *trans, integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *info, ftnlen sidelen, ftnlen translen);
void cunmlq(character *side, character *trans, integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *lwork, integer *info, ftnlen sidelen, ftnlen translen);
void cunmql(character *side, character *trans, integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *lwork, integer *info, ftnlen sidelen, ftnlen translen);
void cunmqr(character *side, character *trans, integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *lwork, integer *info, ftnlen sidelen, ftnlen translen);
void cunmr2(character *side, character *trans, integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *info, ftnlen sidelen, ftnlen translen);
void cunmr3(character *side, character *trans, integer *m, integer *n, integer *k, integer *l, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *info, ftnlen sidelen, ftnlen translen);
void cunmrq(character *side, character *trans, integer *m, integer *n, integer *k, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *lwork, integer *info, ftnlen sidelen, ftnlen translen);
void cunmrz(character *side, character *trans, integer *m, integer *n, integer *k, integer *l, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *lwork, integer *info, ftnlen sidelen, ftnlen translen);
void cunmtr(character *side, character *uplo, character *trans, integer *m, integer *n, complex *a, integer *lda, complex *tau, complex *c, integer *ldc, complex *work, integer *lwork, integer *info, ftnlen sidelen, ftnlen uplolen, ftnlen translen);
void cupgtr(character *uplo, integer *n, complex *ap, complex *tau, complex *q, integer *ldq, complex *work, integer *info, ftnlen uplolen);
void cupmtr(character *side, character *uplo, character *trans, integer *m, integer *n, complex *ap, complex *tau, complex *c, integer *ldc, complex *work, integer *info, ftnlen sidelen, ftnlen uplolen, ftnlen translen);
void dbdsdc(character *uplo, character *compq, integer *n, doubleprecision *d, doubleprecision *e, doubleprecision *u, integer *ldu, doubleprecision *vt, integer *ldvt, doubleprecision *q, integer *iq, doubleprecision *work, integer *iwork, integer *info, ftnlen uplolen, ftnlen compqlen);
void dbdsqr(character *uplo, integer *n, integer *ncvt, integer *nru, integer *ncc, doubleprecision *d, doubleprecision *e, doubleprecision *vt, integer *ldvt, doubleprecision *u, integer *ldu, doubleprecision *c, integer *ldc, doubleprecision *work, integer *info, ftnlen uplolen);
void ddisna(character *job, integer *m, integer *n, doubleprecision *d, doubleprecision *sep, integer *info, ftnlen joblen);
void dgbbrd(character *vect, integer *m, integer *n, integer *ncc, integer *kl, integer *ku, doubleprecision *ab, integer *ldab, doubleprecision *d, doubleprecision *e, doubleprecision *q, integer *ldq, doubleprecision *pt, integer *ldpt, doubleprecision *c, integer *ldc, doubleprecision *work, integer *info, ftnlen vectlen);
void dgbcon(character *norm, integer *n, integer *kl, integer *ku, doubleprecision *ab, integer *ldab, integer *ipiv, doubleprecision *anorm, doubleprecision *rcond, doubleprecision *work, integer *iwork, integer *info, ftnlen normlen);
void dgbequ(integer *m, integer *n, integer *kl, integer *ku, doubleprecision *ab, integer *ldab, doubleprecision *r, doubleprecision *c, doubleprecision *rowcnd, doubleprecision *colcnd, doubleprecision *amax, integer *info);
void dgbrfs(character *trans, integer *n, integer *kl, integer *ku, integer *nrhs, doubleprecision *ab, integer *ldab, doubleprecision *afb, integer *ldafb, integer *ipiv, doubleprecision *b, integer *ldb, doubleprecision *x, integer *ldx, doubleprecision *ferr, doubleprecision *berr, doubleprecision *work, integer *iwork, integer *info, ftnlen translen);
void dgbsv(integer *n, integer *kl, integer *ku, integer *nrhs, doubleprecision *ab, integer *ldab, integer *ipiv, doubleprecision *b, integer *ldb, integer *info);
void dgbsvx(character *fact, character *trans, integer *n, integer *kl, integer *ku, integer *nrhs, doubleprecision *ab, integer *ldab, doubleprecision *afb, integer *ldafb, integer *ipiv, character *equed, doubleprecision *r, doubleprecision *c, doubleprecision *b, integer *ldb, doubleprecision *x, integer *ldx, doubleprecision *rcond, doubleprecision *ferr, doubleprecision *berr, doubleprecision *work, integer *iwork, integer *info, ftnlen factlen, ftnlen translen, ftnlen equedlen);
void dgbtf2(integer *m, integer *n, integer *kl, integer *ku, doubleprecision *ab, integer *ldab, integer *ipiv, integer *info);
void dgbtrf(integer *m, integer *n, integer *kl, integer *ku, doubleprecision *ab, integer *ldab, integer *ipiv, integer *info);
void dgbtrs(character *trans, integer *n, integer *kl, integer *ku, integer *nrhs, doubleprecision *ab, integer *ldab, integer *ipiv, doubleprecision *b, integer *ldb, integer *info, ftnlen translen);
void dgebak(character *job, character *side, integer *n, integer *ilo, integer *ihi, doubleprecision *scale, integer *m, doubleprecision *v, integer *ldv, integer *info, ftnlen joblen, ftnlen sidelen);
void dgebal(character *job, integer *n, doubleprecision *a, integer *lda, integer *ilo, integer *ihi, doubleprecision *scale, integer *info, ftnlen joblen);
void dgebd2(integer *m, integer *n, doubleprecision *a, integer *lda, doubleprecision *d, doubleprecision *e, doubleprecision *tauq, doubleprecision *taup, doubleprecision *work, integer *info);
void dgebrd(integer *m, integer *n, doubleprecision *a, integer *lda, doubleprecision *d, doubleprecision *e, doubleprecision *tauq, doubleprecision *taup, doubleprecision *work, integer *lwork, integer *info);
void dgecon(character *norm, integer *n, doubleprecision *a, integer *lda, doubleprecision *anorm, doubleprecision *rcond, doubleprecision *work, integer *iwork, integer *info, ftnlen normlen);
void dgeequ(integer *m, integer *n, doubleprecision *a, integer *lda, doubleprecision *r, doubleprecision *c, doubleprecision *rowcnd, doubleprecision *colcnd, doubleprecision *amax, integer *info);
void dgees(character *jobvs, character *sort, logical (*select)(doubleprecision *a, doubleprecision *b), integer *n, doubleprecision *a, integer *lda, integer *sdim, doubleprecision *wr, doubleprecision *wi, doubleprecision *vs, integer *ldvs, doubleprecision *work, integer *lwork, logical *bwork, integer *info, ftnlen jobvslen, ftnlen sortlen);
void dgeesx(character *jobvs, character *sort, logical (*select)(doubleprecision *a, doubleprecision *b), character *sense, integer *n, doubleprecision *a, integer *lda, integer *sdim, doubleprecision *wr, doubleprecision *wi, doubleprecision *vs, integer *ldvs, doubleprecision *rconde, doubleprecision *rcondv, doubleprecision *work, integer *lwork, integer *iwork, integer *liwork, logical *bwork, integer *info, ftnlen jobvslen, ftnlen sortlen, ftnlen senselen);
void dgeev(character *jobvl, character *jobvr, integer *n, doubleprecision *a, integer *lda, doubleprecision *wr, doubleprecision *wi, doubleprecision *vl, integer *ldvl, doubleprecision *vr, integer *ldvr, doubleprecision *work, integer *lwork, integer *info, ftnlen jobvllen, ftnlen jobvrlen);
void dgeevx(character *balanc, character *jobvl, character *jobvr, character *sense, integer *n, doubleprecision *a, integer *lda, doubleprecision *wr, doubleprecision *wi, doubleprecision *vl, integer *ldvl, doubleprecision *vr, integer *ldvr, integer *ilo, integer *ihi, doubleprecision *scale, doubleprecision *abnrm, doubleprecision *rconde, doubleprecision *rcondv, doubleprecision *work, integer *lwork, integer *iwork, integer *info, ftnlen balanclen, ftnlen jobvllen, ftnlen jobvrlen, ftnlen senselen);
void dgegs(character *jobvsl, character *jobvsr, integer *n, doubleprecision *a, integer *lda, doubleprecision *b, integer *ldb, doubleprecision *alphar, doubleprecision *alphai, doubleprecision *beta, doubleprecision *vsl, integer *ldvsl, doubleprecision *vsr, integer *ldvsr, doubleprecision *work, integer *lwork, integer *info, ftnlen jobvsllen, ftnlen jobvsrlen);
void dgegv(character *jobvl, character *jobvr, integer *n, doubleprecision *a, integer *lda, doubleprecision *b, integer *ldb, doubleprecision *alphar, doubleprecision *alphai, doubleprecision *beta, doubleprecision *vl, integer *ldvl, doubleprecision *vr, integer *ldvr, doubleprecision *work, integer *lwork, integer *info, ftnlen jobvllen, ftnlen jobvrlen);
void dgehd2(integer *n, integer *ilo, integer *ihi, doubleprecision *a, integer *lda, doubleprecision *tau, doubleprecision *work, integer *info);
void dgehrd(integer *n, integer *ilo, integer *ihi, doubleprecision *a, integer *lda, doubleprecision *tau, doubleprecision *work, integer *lwork, integer *info);
void dgelq2(integer *m, integer *n, doubleprecision *a, integer *lda, doubleprecision *tau, doubleprecision *work, integer *info);
void dgelqf(integer *m, integer *n, doubleprecision *a, integer *lda, doubleprecision *tau, doubleprecision *work, integer *lwork, integer *info);
void dgels(character *trans, integer *m, integer *n, integer *nrhs, doubleprecision *a, integer *lda, doubleprecision *b, integer *ldb, doubleprecision *work, integer *lwork, integer *info, ftnlen translen);
void dgelsd(integer *m, integer *n, integer *nrhs, doubleprecision *a, integer *lda, doubleprecision *b, integer *ldb, doubleprecision *s, doubleprecision *rcond, integer *rank, doubleprecision *work, int