mkl_lapack64.h

最小二乘拟和工具

/*
//               INTEL CORPORATION PROPRIETARY INFORMATION
//  This software is supplied under the terms of a license agreement or
//  nondisclosure agreement with Intel Corporation and may not be copied
//  or disclosed except in accordance with the terms of that agreement.
//  Copyright (c) 1999-2001 Intel Corporation. All Rights Reserved.
//
// File    : mkl_lapack64.h
// Purpose : MKL Fortran interface for LAPACK routines and functions
//           for double precision data
// Author  : Shemyakin Andrey
*/

#ifndef _MKL_LAPACK_D_H_

#define _MKL_LAPACK_D_H_

#include "mkl_types.h"

#ifdef __cplusplus
extern "C" {
#endif /* __cplusplus */

void    DBDSDC(char *uplo,char *compq,int *n,double *d,double *e,double *u,int *ldu,double *vt,int *ldvt,double *q,int *iq,double *work,int *iwork,int *info);
void    dbdsdc(char *uplo,char *compq,int *n,double *d,double *e,double *u,int *ldu,double *vt,int *ldvt,double *q,int *iq,double *work,int *iwork,int *info);
void    DBDSQR(char *uplo,int *n,int *ncvt,int *nru,int *ncc,double *d,double *e,double *vt,int *ldvt,double *u,int *ldu,double *c,int *ldc,double *work,int *info);
void    dbdsqr(char *uplo,int *n,int *ncvt,int *nru,int *ncc,double *d,double *e,double *vt,int *ldvt,double *u,int *ldu,double *c,int *ldc,double *work,int *info);
void    DDISNA(char *job,int *m,int *n,double *d,double *sep,int *info);
void    ddisna(char *job,int *m,int *n,double *d,double *sep,int *info);
void    DGBBRD(char *vect,int *m,int *n,int *ncc,int *kl,int *ku,double *ab,int *ldab,double *d,double *e,double *q,int *ldq,double *pt,int *ldpt,double *c,int *ldc,double *work,int *info);
void    dgbbrd(char *vect,int *m,int *n,int *ncc,int *kl,int *ku,double *ab,int *ldab,double *d,double *e,double *q,int *ldq,double *pt,int *ldpt,double *c,int *ldc,double *work,int *info);
void    DGBCON(char *norm,int *n,int *kl,int *ku,double *ab,int *ldab,int *ipiv,double *anorm,double *rcond,double *work,int *iwork,int *info);
void    dgbcon(char *norm,int *n,int *kl,int *ku,double *ab,int *ldab,int *ipiv,double *anorm,double *rcond,double *work,int *iwork,int *info);
void    DGBEQU(int *m,int *n,int *kl,int *ku,double *ab,int *ldab,double *r,double *c,double *rowcnd,double *colcnd,double *amax,int *info);
void    dgbequ(int *m,int *n,int *kl,int *ku,double *ab,int *ldab,double *r,double *c,double *rowcnd,double *colcnd,double *amax,int *info);
void    DGBRFS(char *trans,int *n,int *kl,int *ku,int *nrhs,double *ab,int *ldab,double *afb,int *ldafb,int *ipiv,double *b,int *ldb,double *x,int *ldx,double *ferr,double *berr,double *work,int *iwork,int *info);
void    dgbrfs(char *trans,int *n,int *kl,int *ku,int *nrhs,double *ab,int *ldab,double *afb,int *ldafb,int *ipiv,double *b,int *ldb,double *x,int *ldx,double *ferr,double *berr,double *work,int *iwork,int *info);
void    DGBSV(int *n,int *kl,int *ku,int *nrhs,double *ab,int *ldab,int *ipiv,double *b,int *ldb,int *info);
void    dgbsv(int *n,int *kl,int *ku,int *nrhs,double *ab,int *ldab,int *ipiv,double *b,int *ldb,int *info);
void    DGBSVX(char *fact,char *trans,int *n,int *kl,int *ku,int *nrhs,double *ab,int *ldab,double *afb,int *ldafb,int *ipiv,char *equed,double *r,double *c,double *b,int *ldb,double *x,int *ldx,double *rcond,double *ferr,double *berr,double *work,int *iwork,int *info);
void    dgbsvx(char *fact,char *trans,int *n,int *kl,int *ku,int *nrhs,double *ab,int *ldab,double *afb,int *ldafb,int *ipiv,char *equed,double *r,double *c,double *b,int *ldb,double *x,int *ldx,double *rcond,double *ferr,double *berr,double *work,int *iwork,int *info);
void    DGBTF2(int *m,int *n,int *kl,int *ku,double *ab,int *ldab,int *ipiv,int *info);
void    dgbtf2(int *m,int *n,int *kl,int *ku,double *ab,int *ldab,int *ipiv,int *info);
void    DGBTRF(int *m,int *n,int *kl,int *ku,double *ab,int *ldab,int *ipiv,int *info);
void    dgbtrf(int *m,int *n,int *kl,int *ku,double *ab,int *ldab,int *ipiv,int *info);
void    DGBTRS(char *trans,int *n,int *kl,int *ku,int *nrhs,double *ab,int *ldab,int *ipiv,double *b,int *ldb,int *info);
void    dgbtrs(char *trans,int *n,int *kl,int *ku,int *nrhs,double *ab,int *ldab,int *ipiv,double *b,int *ldb,int *info);
void    DGEBAK(char *job,char *side,int *n,int *ilo,int *ihi,double *scale,int *m,double *v,int *ldv,int *info);
void    dgebak(char *job,char *side,int *n,int *ilo,int *ihi,double *scale,int *m,double *v,int *ldv,int *info);
void    DGEBAL(char *job,int *n,double *a,int *lda,int *ilo,int *ihi,double *scale,int *info);
void    dgebal(char *job,int *n,double *a,int *lda,int *ilo,int *ihi,double *scale,int *info);
void    DGEBD2(int *m,int *n,double *a,int *lda,double *d,double *e,double *tauq,double *taup,double *work,int *info);
void    dgebd2(int *m,int *n,double *a,int *lda,double *d,double *e,double *tauq,double *taup,double *work,int *info);
void    DGEBRD(int *m,int *n,double *a,int *lda,double *d,double *e,double *tauq,double *taup,double *work,int *lwork,int *info);
void    dgebrd(int *m,int *n,double *a,int *lda,double *d,double *e,double *tauq,double *taup,double *work,int *lwork,int *info);
void    DGECON(char *norm,int *n,double *a,int *lda,double *anorm,double *rcond,double *work,int *iwork,int *info);
void    dgecon(char *norm,int *n,double *a,int *lda,double *anorm,double *rcond,double *work,int *iwork,int *info);
void    DGEEQU(int *m,int *n,double *a,int *lda,double *r,double *c,double *rowcnd,double *colcnd,double *amax,int *info);
void    dgeequ(int *m,int *n,double *a,int *lda,double *r,double *c,double *rowcnd,double *colcnd,double *amax,int *info);
void    DGEES(char *jobvs,char *sort,void *select,int *n,double *a,int *lda,int *sdim,double *wr,double *wi,double *vs,int *ldvs,double *work,int *lwork,void *bwork,int *info);
void    dgees(char *jobvs,char *sort,void *select,int *n,double *a,int *lda,int *sdim,double *wr,double *wi,double *vs,int *ldvs,double *work,int *lwork,void *bwork,int *info);
void    DGEESX(char *jobvs,char *sort,void *select,char *sense,int *n,double *a,int *lda,int *sdim,double *wr,double *wi,double *vs,int *ldvs,double *rconde,double *rcondv,double *work,int *lwork,int *iwork,int *liwork,void *bwork,int *info);
void    dgeesx(char *jobvs,char *sort,void *select,char *sense,int *n,double *a,int *lda,int *sdim,double *wr,double *wi,double *vs,int *ldvs,double *rconde,double *rcondv,double *work,int *lwork,int *iwork,int *liwork,void *bwork,int *info);
void    DGEEV(char *jobvl,char *jobvr,int *n,double *a,int *lda,double *wr,double *wi,double *vl,int *ldvl,double *vr,int *ldvr,double *work,int *lwork,int *info);
void    dgeev(char *jobvl,char *jobvr,int *n,double *a,int *lda,double *wr,double *wi,double *vl,int *ldvl,double *vr,int *ldvr,double *work,int *lwork,int *info);
void    DGEEVX(char *balanc,char *jobvl,char *jobvr,char *sense,int *n,double *a,int *lda,double *wr,double *wi,double *vl,int *ldvl,double *vr,int *ldvr,int *ilo,int *ihi,double *scale,double *abnrm,double *rconde,double *rcondv,double *work,int *lwork,int *iwork,int *info);
void    dgeevx(char *balanc,char *jobvl,char *jobvr,char *sense,int *n,double *a,int *lda,double *wr,double *wi,double *vl,int *ldvl,double *vr,int *ldvr,int *ilo,int *ihi,double *scale,double *abnrm,double *rconde,double *rcondv,double *work,int *lwork,int *iwork,int *info);
void    DGEGS(char *jobvsl,char *jobvsr,int *n,double *a,int *lda,double *b,int *ldb,double *alphar,double *alphai,double *beta,double *vsl,int *ldvsl,double *vsr,int *ldvsr,double *work,int *lwork,int *info);
void    dgegs(char *jobvsl,char *jobvsr,int *n,double *a,int *lda,double *b,int *ldb,double *alphar,double *alphai,double *beta,double *vsl,int *ldvsl,double *vsr,int *ldvsr,double *work,int *lwork,int *info);
void    DGEGV(char *jobvl,char *jobvr,int *n,double *a,int *lda,double *b,int *ldb,double *alphar,double *alphai,double *beta,double *vl,int *ldvl,double *vr,int *ldvr,double *work,int *lwork,int *info);
void    dgegv(char *jobvl,char *jobvr,int *n,double *a,int *lda,double *b,int *ldb,double *alphar,double *alphai,double *beta,double *vl,int *ldvl,double *vr,int *ldvr,double *work,int *lwork,int *info);
void    DGEHD2(int *n,int *ilo,int *ihi,double *a,int *lda,double *tau,double *work,int *info);
void    dgehd2(int *n,int *ilo,int *ihi,double *a,int *lda,double *tau,double *work,int *info);
void    DGEHRD(int *n,int *ilo,int *ihi,double *a,int *lda,double *tau,double *work,int *lwork,int *info);
void    dgehrd(int *n,int *ilo,int *ihi,double *a,int *lda,double *tau,double *work,int *lwork,int *info);
void    DGELQ2(int *m,int *n,double *a,int *lda,double *tau,double *work,int *info);
void    dgelq2(int *m,int *n,double *a,int *lda,double *tau,double *work,int *info);
void    DGELQF(int *m,int *n,double *a,int *lda,double *tau,double *work,int *lwork,int *info);
void    dgelqf(int *m,int *n,double *a,int *lda,double *tau,double *work,int *lwork,int *info);
void    DGELS(char *trans,int *m,int *n,int *nrhs,double *a,int *lda,double *b,int *ldb,double *work,int *lwork,int *info);
void    dgels(char *trans,int *m,int *n,int *nrhs,double *a,int *lda,double *b,int *ldb,double *work,int *lwork,int *info);
void    DGELSD(int *m,int *n,int *nrhs,double *a,int *lda,double *b,int *ldb,double *s,double *rcond,int *rank,double *work,int *lwork,int *iwork,int *info);
void    dgelsd(int *m,int *n,int *nrhs,double *a,int *lda,double *b,int *ldb,double *s,double *rcond,int *rank,double *work,int *lwork,int *iwork,int *info);
void    DGELSS(int *m,int *n,int *nrhs,double *a,int *lda,double *b,int *ldb,double *s,double *rcond,int *rank,double *work,int *lwork,int *info);
void    dgelss(int *m,int *n,int *nrhs,double *a,int *lda,double *b,int *ldb,double *s,double *rcond,int *rank,double *work,int *lwork,int *info);
void    DGELSX(int *m,int *n,int *nrhs,double *a,int *lda,double *b,int *ldb,int *jpvt,double *rcond,int *rank,double *work,int *info);
void    dgelsx(int *m,int *n,int *nrhs,double *a,int *lda,double *b,int *ldb,int *jpvt,double *rcond,int *rank,double *work,int *info);
void    DGELSY(int *m,int *n,int *nrhs,double *a,int *lda,double *b,int *ldb,int *jpvt,double *rcond,int *rank,double *work,int *lwork,int *info);
void    dgelsy(int *m,int *n,int *nrhs,double *a,int *lda,double *b,int *ldb,int *jpvt,double *rcond,int *rank,double *work,int *lwork,int *info);
void    DGEQL2(int *m,int *n,double *a,int *lda,double *tau,double *work,int *info);
void    dgeql2(int *m,int *n,double *a,int *lda,double *tau,double *work,int *info);
void    DGEQLF(int *m,int *n,double *a,int *lda,double *tau,double *work,int *lwork,int *info);
void    dgeqlf(int *m,int *n,double *a,int *lda,double *tau,double *work,int *lwork,int *info);
void    DGEQP3(int *m,int *n,double *a,int *lda,int *jpvt,double *tau,double *work,int *lwork,int *info);
void    dgeqp3(int *m,int *n,double *a,int *lda,int *jpvt,double *tau,double *work,int *lwork,int *info);
void    DGEQPF(int *m,int *n,double *a,int *lda,int *jpvt,double *tau,double *work,int *info);
void    dgeqpf(int *m,int *n,double *a,int *lda,int *jpvt,double *tau,double *work,int *info);
void    DGEQR2(int *m,int *n,double *a,int *lda,double *tau,double *work,int *info);
void    dgeqr2(int *m,int *n,double *a,int *lda,double *tau,double *work,int *info);
void    DGEQRF(int *m,int *n,double *a,int *lda,double *tau,double *work,int *lwork,int *info);
void    dgeqrf(int *m,int *n,double *a,int *lda,double *tau,double *work,int *lwork,int *info);
void    DGERFS(char *trans,int *n,int *nrhs,double *a,int *lda,double *af,int *ldaf,int *ipiv,double *b,int *ldb,double *x,int *ldx,double *ferr,double *berr,double *work,int *iwork,int *info);
void    dgerfs(char *trans,int *n,int *nrhs,double *a,int *lda,double *af,int *ldaf,int *ipiv,double *b,int *ldb,double *x,int *ldx,double *ferr,double *berr,double *work,int *iwork,int *info);