namesilupack.h

数学算法的实现库。可以实现常见的线性计算。

#define ZGNLlupqlsol        ZGNLLUPQLSOL__
#define ZGNLlupqtlsol       ZGNLLUPQTLSOL__
#define ZGNLlupqusol        ZGNLLUPQUSOL__
#define ZGNLlupqtusol       ZGNLLUPQTUSOL__
#define ZGNLlupqdlsol       ZGNLLUPQDLSOL__
#define ZGNLlupqtdlsol      ZGNLLUPQTDLSOL__
#define ZGNLlupqdusol       ZGNLLUPQDUSOL__
#define ZGNLlupqtdusol      ZGNLLUPQTDUSOL__
#define ZHPDldlp            ZHPDLDLP__
#define ZHPDldlpsol         ZHPDLDLPSOL__

#define ZGNLilutp           ZGNLILUTP__
#define ZGNLilut            ZGNLILUT__
#define ZGNLlusol           ZGNLLUSOL__
#define ZGNLlutsol          ZGNLLUTSOL__
#define ZGNLlulsol          ZGNLLULSOL__
#define ZGNLlutlsol         ZGNLLUTLSOL__
#define ZGNLluusol          ZGNLLUUSOL__
#define ZGNLlutusol         ZGNLLUTUSOL__
#define ZGNLludlsol         ZGNLLUDLSOL__
#define ZGNLlutdlsol        ZGNLLUTDLSOL__
#define ZGNLludusol         ZGNLLUDUSOL__
#define ZGNLlutdusol        ZGNLLUTDUSOL__

#define ZGNLiluc            ZGNLILUC__
#define ZGNLilucsol         ZGNLILUCSOL__
#define ZGNLiluctsol        ZGNLILUCTSOL__
#define ZGNLilucdlsol       ZGNLILUCDLSOL__
#define ZGNLiluctdlsol      ZGNLILUCTDLSOL__
#define ZGNLilucdusol       ZGNLILUCDUSOL__
#define ZGNLiluctdusol      ZGNLILUCTDUSOL__
#define ZGNLiluclsol        ZGNLILUCLSOL__
#define ZGNLiluctlsol       ZGNLILUCTLSOL__
#define ZGNLilucusol        ZGNLILUCUSOL__
#define ZGNLiluctusol       ZGNLILUCTUSOL__

#define ZGNLpilucdlsol      ZGNLPILUCDLSOL__
#define ZGNLpiluctdlsol     ZGNLPILUCTDLSOL__
#define ZGNLpilucdusol      ZGNLPILUCDUSOL__
#define ZGNLpiluctdusol     ZGNLPILUCTDUSOL__
#define ZGNLpiluclsol       ZGNLPILUCLSOL__
#define ZGNLpiluctlsol      ZGNLPILUCTLSOL__
#define ZGNLpilucusol       ZGNLPILUCUSOL__
#define ZGNLpiluctusol      ZGNLPILUCTUSOL__

#define ZHERildlc           ZHERILDLC__
#define ZHERildlcsol        ZHERILDLCSOL__
#define ZSHRildlc           ZSHRILDLC__
#define ZSHRildlcsol        ZSHRILDLCSOL__
#define ZSYMildlc           ZSYMILDLC__
#define ZSYMildlcsol        ZSYMILDLCSOL__
#define ZSSMildlc           ZSSMILDLC__
#define ZSSMildlcsol        ZSSMILDLCSOL__
#define ZGNLpiluc           ZGNLPILUC__
#define ZGNLmpiluc          ZGNLMPILUC__
#define ZHPDpiluc           ZHPDPILUC__
#define ZHPDmpiluc          ZHPDMPILUC__
#define ZSYMiluc            ZSYMILUC__
#define ZSYMpiluc           ZSYMPILUC__
#define ZSYMmpiluc          ZSYMMPILUC__
#define ZSYMpilucsol        ZSYMPILUCSOL__
#define ZHERiluc            ZHERILUC__
#define ZHERpiluc           ZHERPILUC__
#define ZHERmpiluc          ZHERMPILUC__
#define ZHERpilucsol        ZHERPILUCSOL__


#define Zpcg                ZPCG__
#define Zbcg                ZBCG__
#define ZSYMbcg             ZSYMBCG__
#define ZHERbcg             ZHERBCG__
#define ZSYMqmr             ZSYMQMR__
#define ZHERqmr             ZHERQMR__
#define Zgmres              ZGMRES__
#define Zfgmres             ZFGMRES__
#define Zdistdotc           ZDISTDOTC__
#define Zdistdotu           ZDISTDOTU__


#define Zroscal             ZROSCAL__
#define Zcoscal             ZCOSCAL__
#define Zrowscale           ZROWSCALE__
#define Zcolscale           ZCOLSCALE__
#define ZHPDscale           ZHPDSCALE__
#define ZSYMscale           ZSYMSCALE__
#define ZHERscale           ZHERSCALE__
#define Zcsrcsc             ZCSRCSC__
#define Zqqsort             ZQQSORT__
#define Zqqsort2            ZQQSORT2__
#define Zqqsorts            ZQQSORTS__
#define Zqqsorts2           ZQQSORTS2__

#define Zreadmtc            ZREADMTC__
#define Zwritemtc           ZWRITEMTC__
#define Zreadvectors        ZREADVECTORS__
#define Zwritevectors       ZWRITEVECTORS__



#define csymilupack         CSYMILUPACK__
#define csymilupackfac      CSYMILUPACKFAC__
#define csymilupacksol      CSYMILUPACKSOL__
#define csymilupackdel      CSYMILUPACKDEL__
#define cherilupack         CHERILUPACK__
#define cherilupackfac      CHERILUPACKFAC__
#define cherilupacksol      CHERILUPACKSOL__
#define cherilupackdel      CHERILUPACKDEL__

#define CGNLlupq            CGNLLUPQ__
#define CGNLlupqsol         CGNLLUPQSOL__
#define CGNLlupqtsol        CGNLLUPQTSOL__
#define CGNLlupqlsol        CGNLLUPQLSOL__
#define CGNLlupqtlsol       CGNLLUPQTLSOL__
#define CGNLlupqusol        CGNLLUPQUSOL__
#define CGNLlupqtusol       CGNLLUPQTUSOL__
#define CGNLlupqdlsol       CGNLLUPQDLSOL__
#define CGNLlupqtdlsol      CGNLLUPQTDLSOL__
#define CGNLlupqdusol       CGNLLUPQDUSOL__
#define CGNLlupqtdusol      CGNLLUPQTDUSOL__
#define CHPDldlp            CHPDLDLP__
#define CHPDldlpsol         CHPDLDLPSOL__

#define CGNLilutp           CGNLILUTP__
#define CGNLilut            CGNLILUT__
#define CGNLlusol           CGNLLUSOL__
#define CGNLlutsol          CGNLLUTSOL__
#define CGNLlulsol          CGNLLULSOL__
#define CGNLlutlsol         CGNLLUTLSOL__
#define CGNLluusol          CGNLLUUSOL__
#define CGNLlutusol         CGNLLUTUSOL__
#define CGNLludlsol         CGNLLUDLSOL__
#define CGNLlutdlsol        CGNLLUTDLSOL__
#define CGNLludusol         CGNLLUDUSOL__
#define CGNLlutdusol        CGNLLUTDUSOL__

#define CGNLiluc            CGNLILUC__
#define CGNLilucsol         CGNLILUCSOL__
#define CGNLiluctsol        CGNLILUCTSOL__
#define CGNLilucdlsol       CGNLLILUCDLSOL__
#define CGNLiluctdlsol      CGNLILUCTDLSOL__
#define CGNLilucdusol       CGNLILUCDUSOL__
#define CGNLiluctdusol      CGNLILUCTDUSOL__
#define CGNLiluclsol        CGNLILUCLSOL__
#define CGNLiluctlsol       CGNLILUCTLSOL__
#define CGNLilucusol        CGNLILUCUSOL__
#define CGNLiluctusol       CGNLILUCTUSOL__

#define CGNLpilucdlsol      CGNLPILUCDLSOL__
#define CGNLpiluctdlsol     CGNLPILUCTDLSOL__
#define CGNLpilucdusol      CGNLPILUCDUSOL__
#define CGNLpiluctdusol     CGNLPILUCTDUSOL__
#define CGNLpiluclsol       CGNLPILUCLSOL__
#define CGNLpiluctlsol      CGNLPILUCTLSOL__
#define CGNLpilucusol       CGNLPILUCUSOL__
#define CGNLpiluctusol      CGNLPILUCTUSOL__

#define CHERildlc           CHERILDLC__
#define CHERildlcsol        CHERILDLCSOL__
#define CSHRildlc           CSHRILDLC__
#define CSHRildlcsol        CSHRILDLCSOL__
#define CSYMildlc           CSYMILDLC__
#define CSYMildlcsol        CSYMILDLCSOL__
#define CSSMildlc           CSSMILDLC__
#define CSSMildlcsol        CSSMILDLCSOL__
#define CGNLpiluc           CGNLPILUC__
#define CGNLmpiluc          CGNLMPILUC__
#define CHPDpiluc           CHPDPILUC__
#define CHPDmpiluc          CHPDMPILUC__
#define CSYMiluc            CSYMILUC__
#define CSYMpiluc           CSYMPILUC__
#define CSYMmpiluc          CSYMMPILUC__
#define CSYMpilucsol        CSYMPILUCSOL__
#define CHERiluc            CHERILUC__
#define CHERpiluc           CHERPILUC__
#define CHERmpiluc          CHERMPILUC__
#define CHERpilucsol        CHERPILUCSOL__


#define Cpcg                CPCG__
#define Cbcg                CBCG__
#define CSYMbcg             CSYMBCG__
#define CHERbcg             CHERBCG__
#define CSYMqmr             CSYMQMR__
#define CHERqmr             CHERQMR__
#define Cgmres              CGMRES__
#define Cfgmres             CFGMRES__
#define Cdistdotc           CDISTDOTC__
#define Cdistdotu           CDISTDOTU__


#define Croscal             CROSCAL__
#define Ccoscal             CCOSCAL__
#define Crowscale           CROWSCALE__
#define Ccolscale           CCOLSCALE__
#define CHPDscale           CHPDSCALE__
#define CSYMscale           CSYMSCALE__
#define CHERscale           CHERSCALE__
#define Ccsrcsc             CCSRCSC__
#define Cqqsort             CQQSORT__
#define Cqqsort2            CQQSORT2__
#define Cqqsorts            CQQSORTS__
#define Cqqsorts2           CQQSORTS2__

#define Creadmtc            CREADMTC__
#define Cwritemtc           CWRITEMTC__
#define Creadvectors        CREADVECTORS__
#define Cwritevectors       CWRITEVECTORS__




/* no capital letters but 2 underscores */
#elif defined __2UNDERSCORES__ && !defined __CAPS__
#define qqsorti             qqsorti__

#define dsymilupack         dsymilupack__
#define dsymilupackfac      dsymilupackfac__
#define dsymilupacksol      dsymilupacksol__
#define dsymilupackdel      dsymilupackdel__

#define DGNLlupq            dgnllupq__
#define DGNLlupqsol         dgnllupqsol__
#define DGNLlupqtsol        dgnllupqtsol__
#define DGNLlupqlsol        dgnllupqlsol__
#define DGNLlupqtlsol       dgnllupqtlsol__
#define DGNLlupqusol        dgnllupqusol__
#define DGNLlupqtusol       dgnllupqtusol__
#define DGNLlupqdlsol       dgnllupqdlsol__
#define DGNLlupqtdlsol      dgnllupqtdlsol__
#define DGNLlupqdusol       dgnllupqdusol__
#define DGNLlupqtdusol      dgnllupqtdusol__
#define DSPDldlp            dspdldlp__
#define DSPDldlpsol         dspdldlpsol__


#define DGNLilutp           dgnlilutp__
#define DGNLilut            dgnlilut__
#define DGNLlusol           dgnllusol__
#define DGNLlutsol          dgnllutsol__
#define DGNLlulsol          dgnllulsol__
#define DGNLlutlsol         dgnllutlsol__
#define DGNLluusol          dgnlluusol__
#define DGNLlutusol         dgnllutusol__
#define DGNLludlsol         dgnlludlsol__
#define DGNLlutdlsol        dgnllutdlsol__
#define DGNLludusol         dgnlludusol__
#define DGNLlutdusol        dgnllutdusol__

#define DGNLiluc            dgnliluc__
#define DGNLilucsol         dgnlilucsol__
#define DGNLiluctsol        dgnliluctsol__
#define DGNLilucdlsol       dgnlilucdlsol__
#define DGNLiluctdlsol      dgnliluctdlsol__
#define DGNLilucdusol       dgnlilucdusol__
#define DGNLiluctdusol      dgnliluctdusol__
#define DGNLiluclsol        dgnliluclsol__
#define DGNLiluctlsol       dgnliluctlsol__
#define DGNLilucusol        dgnlilucusol__
#define DGNLiluctusol       dgnliluctusol__

#define DGNLpilucdlsol      dgnlpilucdlsol__
#define DGNLpiluctdlsol     dgnlpiluctdlsol__
#define DGNLpilucdusol      dgnlpilucdusol__
#define DGNLpiluctdusol     dgnlpiluctdusol__
#define DGNLpiluclsol       dgnlpiluclsol__
#define DGNLpiluctlsol      dgnlpiluctlsol__
#define DGNLpilucusol       dgnlpilucusol__
#define DGNLpiluctusol      dgnlpiluctusol__

#define DSYMildlc           dsymildlc__
#define DSYMildlcsol        dsymildlcsol__
#define DSSMildlc           dssmildlc__
#define DSSMildlcsol        dssmildlcsol__
#define DGNLpiluc           dgnlpiluc__
#define DGNLmpiluc          dgnlmpiluc__
#define DSPDpiluc           dspdpiluc__
#define DSPDmpiluc          dspdmpiluc__
#define DSYMiluc            dsymiluc__
#define DSYMpiluc           dsympiluc__
#define DSYMmpiluc          dsymmpiluc__
#define DSYMpilucsol        dsympilucsol__


#define Dpcg                dpcg__
#define Dbcg                dbcg__
#define DSYMbcg             dsymbcg__
#define DSYMqmr             dsymqmr__
#define Dgmres              dgmres__
#define Dfgmres             dfgmres__
#define Ddistdot            ddistdot__


#define Droscal             droscal__
#define Dcoscal             dcoscal__
#define Drowscale           drowscale__
#define Dcolscale           dcolscale__
#define DSPDscale           dspdscale__
#define DSYMscale           dsymscale__
#define Dcsrcsc             dcsrcsc__
#define Dqqsort             dqqsort__
#define Dqqsort2            dqqsort2__
#define Dqqsorts            dqqsorts__
#define Dqqsorts2           dqqsorts2__

#define Dreadmtc            dreadmtc__
#define Dwritemtc           dwritemtc__
#define Dreadvectors        dreadvectors__
#define Dwritevectors       dwritevectors__



#define ssymilupack         ssymilupack__
#define ssymilupackfac      ssymilupackfac__
#define ssymilupacksol      ssymilupacksol__
#define ssymilupackdel      ssymilupackdel__

#define SGNLlupq            sgnllupq__
#define SGNLlupqsol         sgnllupqsol__
#define SGNLlupqtsol        sgnllupqtsol__
#define SGNLlupqlsol        sgnllupqlsol__
#define SGNLlupqtlsol       sgnllupqtlsol__
#define SGNLlupqusol        sgnllupqusol__
#define SGNLlupqtusol       sgnllupqtusol__
#define SGNLlupqdlsol       sgnllupqdlsol__
#define SGNLlupqtdlsol      sgnllupqtdlsol__
#define SGNLlupqdusol       sgnllupqdusol__
#define SGNLlupqtdusol      sgnllupqtdusol__
#define SSPDldlp            sspdldlp__
#define SSPDldlpsol         sspdldlpsol__


#define SGNLilutp           sgnlilutp__
#define SGNLilut            sgnlilut__
#define SGNLlusol           sgnllusol__
#define SGNLlutsol          sgnllutsol__
#define SGNLlulsol          sgnllulsol__
#define SGNLlutlsol         sgnllutlsol__
#define SGNLluusol          sgnlluusol__
#define SGNLlutusol         sgnllutusol__
#define SGNLludlsol         sgnlludlsol__
#define SGNLlutdlsol        sgnllutdlsol__
#define SGNLludusol         sgnlludusol__
#define SGNLlutdusol        sgnllutdusol__

#define SGNLiluc            sgnliluc__
#define SGNLilucsol         sgnlilucsol__
#define SGNLiluctsol        sgnliluctsol__
#define SGNLilucdlsol       sgnlilucdlsol__
#define SGNLiluctdlsol      sgnliluctdlsol__
#define SGNLilucdusol       sgnlilucdusol__
#define SGNLiluctdusol      sgnliluctdusol__
#define SGNLiluclsol        sgnliluclsol__
#define SGNLiluctlsol       sgnliluctlsol__
#define SGNLilucusol        sgnlilucusol__
#define SGNLiluctusol       sgnliluctusol__

#define SGNLpilucdlsol      sgnlpilucdlsol__
#define SGNLpiluctdlsol     sgnlpiluctdlsol__
#define SGNLpilucdusol      sgnlpilucdusol__
#define SGNLpiluctdusol     sgnlpiluctdusol__
#define SGNLpiluclsol       sgnlpiluclsol__
#define SGNLpiluctlsol      sgnlpiluctlsol__
#define SGNLpilucusol       sgnlpilucusol__
#define SGNLpiluctusol      sgnlpiluctusol__

#define SSYMildlc           ssymildlc__
#define SSYMildlcsol        ssymildlcsol__
#define SSSMildlc           sssmildlc__
#define SSSMildlcsol        sssmi