mkl_lapack32.h

最小二乘拟和工具

void    CLADIV( MKL_Complex8 *pres, MKL_Complex8 *x, MKL_Complex8 *y);
void    cladiv( MKL_Complex8 *pres, MKL_Complex8 *x, MKL_Complex8 *y);
void    CLAED0(int *qsiz,int *n,float *d,float *e, MKL_Complex8 *q,int *ldq, MKL_Complex8 *qstore,int *ldqs,float *rwork,int *iwork,int *info);
void    claed0(int *qsiz,int *n,float *d,float *e, MKL_Complex8 *q,int *ldq, MKL_Complex8 *qstore,int *ldqs,float *rwork,int *iwork,int *info);
void    CLAED7(int *n,int *cutpnt,int *qsiz,int *tlvls,int *curlvl,int *curpbm,float *d, MKL_Complex8 *q,int *ldq,float *rho,int *indxq,float *qstore,int *qptr,int *prmptr,int *perm,int *givptr,int *givcol,float *givnum, MKL_Complex8 *work,float *rwork,int *iwork,int *info);
void    claed7(int *n,int *cutpnt,int *qsiz,int *tlvls,int *curlvl,int *curpbm,float *d, MKL_Complex8 *q,int *ldq,float *rho,int *indxq,float *qstore,int *qptr,int *prmptr,int *perm,int *givptr,int *givcol,float *givnum, MKL_Complex8 *work,float *rwork,int *iwork,int *info);
void    CLAED8(int *k,int *n,int *qsiz, MKL_Complex8 *q,int *ldq,float *d,float *rho,int *cutpnt,float *z,float *dlamda, MKL_Complex8 *q2,int *ldq2,float *w,int *indxp,int *indx,int *indxq,int *perm,int *givptr,int *givcol,float *givnum,int *info);
void    claed8(int *k,int *n,int *qsiz, MKL_Complex8 *q,int *ldq,float *d,float *rho,int *cutpnt,float *z,float *dlamda, MKL_Complex8 *q2,int *ldq2,float *w,int *indxp,int *indx,int *indxq,int *perm,int *givptr,int *givcol,float *givnum,int *info);
void    CLAEIN(void *rightv,void *noinit,int *n, MKL_Complex8 *h,int *ldh, MKL_Complex8 *w, MKL_Complex8 *v, MKL_Complex8 *b,int *ldb,float *rwork,float *eps3,float *smlnum,int *info);
void    claein(void *rightv,void *noinit,int *n, MKL_Complex8 *h,int *ldh, MKL_Complex8 *w, MKL_Complex8 *v, MKL_Complex8 *b,int *ldb,float *rwork,float *eps3,float *smlnum,int *info);
void    CLAESY( MKL_Complex8 *a, MKL_Complex8 *b, MKL_Complex8 *c, MKL_Complex8 *rt1, MKL_Complex8 *rt2, MKL_Complex8 *evscal, MKL_Complex8 *cs1, MKL_Complex8 *sn1);
void    claesy( MKL_Complex8 *a, MKL_Complex8 *b, MKL_Complex8 *c, MKL_Complex8 *rt1, MKL_Complex8 *rt2, MKL_Complex8 *evscal, MKL_Complex8 *cs1, MKL_Complex8 *sn1);
void    CLAEV2( MKL_Complex8 *a, MKL_Complex8 *b, MKL_Complex8 *c,float *rt1,float *rt2,float *cs1, MKL_Complex8 *sn1);
void    claev2( MKL_Complex8 *a, MKL_Complex8 *b, MKL_Complex8 *c,float *rt1,float *rt2,float *cs1, MKL_Complex8 *sn1);
void    CLAGS2(void *upper,float *a1, MKL_Complex8 *a2,float *a3,float *b1, MKL_Complex8 *b2,float *b3,float *csu, MKL_Complex8 *snu,float *csv, MKL_Complex8 *snv,float *csq, MKL_Complex8 *snq);
void    clags2(void *upper,float *a1, MKL_Complex8 *a2,float *a3,float *b1, MKL_Complex8 *b2,float *b3,float *csu, MKL_Complex8 *snu,float *csv, MKL_Complex8 *snv,float *csq, MKL_Complex8 *snq);
void    CLAGTM(char *trans,int *n,int *nrhs,float *alpha, MKL_Complex8 *dl, MKL_Complex8 *d, MKL_Complex8 *du, MKL_Complex8 *x,int *ldx,float *beta, MKL_Complex8 *b,int *ldb);
void    clagtm(char *trans,int *n,int *nrhs,float *alpha, MKL_Complex8 *dl, MKL_Complex8 *d, MKL_Complex8 *du, MKL_Complex8 *x,int *ldx,float *beta, MKL_Complex8 *b,int *ldb);
void    CLAHEF(char *uplo,int *n,int *nb,int *kb, MKL_Complex8 *a,int *lda,int *ipiv, MKL_Complex8 *w,int *ldw,int *info);
void    clahef(char *uplo,int *n,int *nb,int *kb, MKL_Complex8 *a,int *lda,int *ipiv, MKL_Complex8 *w,int *ldw,int *info);
void    CLAHQR(void *wantt,void *wantz,int *n,int *ilo,int *ihi,float *h,int *ldh, MKL_Complex8 *w,int *iloz,int *ihiz, MKL_Complex8 *z,int *ldz,int *info);
void    clahqr(void *wantt,void *wantz,int *n,int *ilo,int *ihi,float *h,int *ldh, MKL_Complex8 *w,int *iloz,int *ihiz, MKL_Complex8 *z,int *ldz,int *info);
void    CLAHRD(int *n,int *k,int *nb, MKL_Complex8 *a,int *lda, MKL_Complex8 *tau, MKL_Complex8 *t,int *ldt, MKL_Complex8 *y,int *ldy);
void    clahrd(int *n,int *k,int *nb, MKL_Complex8 *a,int *lda, MKL_Complex8 *tau, MKL_Complex8 *t,int *ldt, MKL_Complex8 *y,int *ldy);
void    CLAIC1(int *job,int *j, MKL_Complex8 *x,float *sest, MKL_Complex8 *w, MKL_Complex8 *gamma,float *sestpr, MKL_Complex8 *s, MKL_Complex8 *c);
void    claic1(int *job,int *j, MKL_Complex8 *x,float *sest, MKL_Complex8 *w, MKL_Complex8 *gamma,float *sestpr, MKL_Complex8 *s, MKL_Complex8 *c);
void    CLALS0(int *icompq,int *nl,int *nr,int *sqre,int *nrhs, MKL_Complex8 *b,int *ldb, MKL_Complex8 *bx,int *ldbx,int *perm,int *givptr,int *givcol,int *ldgcol,float *givnum,int *ldgnum,float *poles,float *difl,float *difr,float *z,float *k,float *c,float *s,float *rwork,int *info);
void    clals0(int *icompq,int *nl,int *nr,int *sqre,int *nrhs, MKL_Complex8 *b,int *ldb, MKL_Complex8 *bx,int *ldbx,int *perm,int *givptr,int *givcol,int *ldgcol,float *givnum,int *ldgnum,float *poles,float *difl,float *difr,float *z,float *k,float *c,float *s,float *rwork,int *info);
void    CLALSA(int *icompq,int *smlsiz,int *n,int *nrhs, MKL_Complex8 *b,int *ldb, MKL_Complex8 *bx,int *ldbx,float *u,int *ldu,float *vt,float *k,float *difl,float *difr,float *z,float *poles,int *givptr,int *givcol,int *ldgcol,int *perm,float *givnum,float *c,float *s,float *rwork,int *iwork,int *info);
void    clalsa(int *icompq,int *smlsiz,int *n,int *nrhs, MKL_Complex8 *b,int *ldb, MKL_Complex8 *bx,int *ldbx,float *u,int *ldu,float *vt,float *k,float *difl,float *difr,float *z,float *poles,int *givptr,int *givcol,int *ldgcol,int *perm,float *givnum,float *c,float *s,float *rwork,int *iwork,int *info);
void    CLALSD(char *uplo,int *smlsiz,int *n,int *nrhs,float *d,float *e, MKL_Complex8 *b,int *ldb,float *rcond,int *rank, MKL_Complex8 *work,float *rwork,int *iwork,int *info);
void    clalsd(char *uplo,int *smlsiz,int *n,int *nrhs,float *d,float *e, MKL_Complex8 *b,int *ldb,float *rcond,int *rank, MKL_Complex8 *work,float *rwork,int *iwork,int *info);
float   CLANGB(char *norm,int *n,int *kl,int *ku, MKL_Complex8 *ab,int *ldab,float *work);
float   clangb(char *norm,int *n,int *kl,int *ku, MKL_Complex8 *ab,int *ldab,float *work);
float   CLANGE(char *norm,int *m,int *n, MKL_Complex8 *a,int *lda,float *work);
float   clange(char *norm,int *m,int *n, MKL_Complex8 *a,int *lda,float *work);
float   CLANGT(char *norm,int *n, MKL_Complex8 *dl, MKL_Complex8 *d, MKL_Complex8 *du);
float   clangt(char *norm,int *n, MKL_Complex8 *dl, MKL_Complex8 *d, MKL_Complex8 *du);
float   CLANHB(char *norm,char *uplo,int *n,int *k, MKL_Complex8 *ab,int *ldab,float *work);
float   clanhb(char *norm,char *uplo,int *n,int *k, MKL_Complex8 *ab,int *ldab,float *work);
float   CLANHE(char *norm,char *uplo,int *n, MKL_Complex8 *a,int *lda,float *work);
float   clanhe(char *norm,char *uplo,int *n, MKL_Complex8 *a,int *lda,float *work);
float   CLANHP(char *norm,char *uplo,int *n, MKL_Complex8 *ap,float *work);
float   clanhp(char *norm,char *uplo,int *n, MKL_Complex8 *ap,float *work);
float   CLANHS(char *norm,int *n, MKL_Complex8 *a,int *lda,float *work);
float   clanhs(char *norm,int *n, MKL_Complex8 *a,int *lda,float *work);
float   CLANHT(char *norm,int *n,float *d, MKL_Complex8 *e);
float   clanht(char *norm,int *n,float *d, MKL_Complex8 *e);
float   CLANSB(char *norm,char *uplo,int *n,int *k, MKL_Complex8 *ab,int *ldab,float *work);
float   clansb(char *norm,char *uplo,int *n,int *k, MKL_Complex8 *ab,int *ldab,float *work);
float   CLANSP(char *norm,char *uplo,int *n, MKL_Complex8 *ap,float *work);
float   clansp(char *norm,char *uplo,int *n, MKL_Complex8 *ap,float *work);
float   CLANSY(char *norm,char *uplo,int *n, MKL_Complex8 *a,int *lda,float *work);
float   clansy(char *norm,char *uplo,int *n, MKL_Complex8 *a,int *lda,float *work);
float   CLANTB(char *norm,char *uplo,char *diag,int *n,int *k, MKL_Complex8 *ab,int *ldab,float *work);
float   clantb(char *norm,char *uplo,char *diag,int *n,int *k, MKL_Complex8 *ab,int *ldab,float *work);
float   CLANTP(char *norm,char *uplo,char *diag,int *n, MKL_Complex8 *ap,float *work);
float   clantp(char *norm,char *uplo,char *diag,int *n, MKL_Complex8 *ap,float *work);
float   CLANTR(char *norm,char *uplo,char *diag,int *m,int *n, MKL_Complex8 *a,int *lda,float *work);
float   clantr(char *norm,char *uplo,char *diag,int *m,int *n, MKL_Complex8 *a,int *lda,float *work);
void    CLAPLL(int *n, MKL_Complex8 *x,int *incx, MKL_Complex8 *y,int *incy,float *ssmin);
void    clapll(int *n, MKL_Complex8 *x,int *incx, MKL_Complex8 *y,int *incy,float *ssmin);
void    CLAPMT(void *forwrd,int *m,int *n, MKL_Complex8 *x,int *ldx,int *k);
void    clapmt(void *forwrd,int *m,int *n, MKL_Complex8 *x,int *ldx,int *k);
void    CLAQGB(int *m,int *n,int *kl,int *ku, MKL_Complex8 *ab,int *ldab,float *r,float *c,float *rowcnd,float *colcnd,float *amax,char *equed);
void    claqgb(int *m,int *n,int *kl,int *ku, MKL_Complex8 *ab,int *ldab,float *r,float *c,float *rowcnd,float *colcnd,float *amax,char *equed);
void    CLAQGE(int *m,int *n, MKL_Complex8 *a,int *lda,float *r,float *c,float *rowcnd,float *colcnd,float *amax,char *equed);
void    claqge(int *m,int *n, MKL_Complex8 *a,int *lda,float *r,float *c,float *rowcnd,float *colcnd,float *amax,char *equed);
void    CLAQHB(char *uplo,int *n,int *kd, MKL_Complex8 *ab,int *ldab,float *s,float *scond,float *amax,char *equed);
void    claqhb(char *uplo,int *n,int *kd, MKL_Complex8 *ab,int *ldab,float *s,float *scond,float *amax,char *equed);
void    CLAQHE(char *uplo,int *n, MKL_Complex8 *a,int *lda,float *s,float *scond,float *amax,char *equed);
void    claqhe(char *uplo,int *n, MKL_Complex8 *a,int *lda,float *s,float *scond,float *amax,char *equed);
void    CLAQHP(char *uplo,int *n, MKL_Complex8 *ap,float *s,float *scond,float *amax,char *equed);
void    claqhp(char *uplo,int *n, MKL_Complex8 *ap,float *s,float *scond,float *amax,char *equed);
void    CLAQP2(int *m,int *n,int *offset, MKL_Complex8 *a,int *lda,int *jpvt, MKL_Complex8 *tau,float *vn1,float *vn2, MKL_Complex8 *work);
void    claqp2(int *m,int *n,int *offset, MKL_Complex8 *a,int *lda,int *jpvt, MKL_Complex8 *tau,float *vn1,float *vn2, MKL_Complex8 *work);
void    CLAQPS(int *m,int *n,int *offset,int *nb,int *kb, MKL_Complex8 *a,int *lda,int *jpvt, MKL_Complex8 *tau,float *vn1,float *vn2, MKL_Complex8 *auxv, MKL_Complex8 *f,int *ldf);
void    claqps(int *m,int *n,int *offset,int *nb,int *kb, MKL_Complex8 *a,int *lda,int *jpvt, MKL_Complex8 *tau,float *vn1,float *vn2, MKL_Complex8 *auxv, MKL_Complex8 *f,int *ldf);
void    CLAQSB(char *uplo,int *n,int *kd, MKL_Complex8 *ab,int *ldab,float *s,float *scond,float *amax,char *equed);
void    claqsb(char *uplo,int *n,int *kd, MKL_Complex8 *ab,int *ldab,float *s,float *scond,float *amax,char *equed);
void    CLAQSP(char *uplo,int *n, MKL_Complex8 *ap,float *s,float *scond,float *amax,char *equed);
void    claqsp(char *uplo,int *n, MKL_Complex8 *ap,float *s,float *scond,float *amax,char *equed);
void    CLAQSY(char *uplo,int *n, MKL_Complex8 *a,int *lda,float *s,float *scond,float *amax,char *equed);
void    claqsy(char *uplo,int *n, MKL_Complex8 *a,int *lda,float *s,float *scond,float *amax,char *equed);
void    CLAR1V(int *n,int *b1,int *bn,float *sigma,float *d,float *l,float *ld,float *lld,float *gersch, MKL_Complex8 *z,float *ztz,float *mingma,int *r,int *isuppz,float *work);
void    clar1v(int *n,int *b1,int *bn,float *sigma,float *d,float *l,float *ld,float *lld,float *gersch, MKL_Complex8 *z,float *ztz,float *mingma,int *r,int *isuppz,float *work);
void    CLAR2V(int *n, MKL_Complex8 *x, MKL_Complex8 *y, MKL_Complex8 *z,int *incx,float *c, MKL_Complex8 *s,int *incc);
void    clar2v(int *n, MKL_Complex8 *x, MKL_Complex8 *y, MKL_Complex8 *z,int *incx,float *c, MKL_Complex8 *s,int *incc);
void    CLARCM(int *m,int *n,float *a,int *lda, MKL_Complex8 *b,int *ldb, MKL_Complex8 *c,int *ldc,float *rwork);