ilupackmacros.h

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

#define PILUCDLSOL    SGNLpilucdlsol
#define PILUCTDLSOL   SGNLpiluctdlsol
#define PILUCDUSOL    SGNLpilucdusol
#define PILUCTDUSOL   SGNLpiluctdusol
#define PILUCLSOL     SGNLpiluclsol
#define PILUCTLSOL    SGNLpiluctlsol
#define PILUCUSOL     SGNLpilucusol
#define PILUCTUSOL    SGNLpiluctusol

#define ILUTP        SGNLilutp
#define ILUT         SGNLilut
#define LUSOL        SGNLlusol
#define LUTSOL       SGNLlutsol
#define LUUSOL       SGNLluusol
#define LUTUSOL      SGNLlutusol
#define LULSOL       SGNLlulsol
#define LUTLSOL      SGNLlutlsol
#define LUDUSOL      SGNLludusol
#define LUTDUSOL     SGNLlutdusol
#define LUDLSOL      SGNLludlsol
#define LUTDLSOL     SGNLlutdlsol

#define CPERM        Scperm
#define RPERM        Srperm

#define PERMNULL     SGNLperm_null
#define PERMND       SGNLperm_nd
#define PERMRCM      SGNLperm_rcm
#define PERMAMF      SGNLperm_amf
#define PERMAMD      SGNLperm_amd
#define PERMMMD      SGNLperm_mmd
#define PERMMETISE   SGNLperm_metis_e
#define PERMMETISN   SGNLperm_metis_n
#define PERMPQ       SGNLperm_pq
#define PERMFC       SGNLperm_fc
#define INDFC        Sindfc
#define SYMPERMFC    SSYMperm_fc
#define SYMINDFC     SSYMindfc
#define SPDPERMFC    SSPDperm_fc
#define SPDINDFC     SSPDindfc
#define PERMP        SGNLperm_p
#define PERMINDSET   SGNLperm_indset

#define SPDPERMNULL     SSPDperm_null
#define SPDPERMND       SSPDperm_nd
#define SPDPERMRCM      SSPDperm_rcm
#define SPDPERMAMF      SSPDperm_amf
#define SPDPERMAMD      SSPDperm_amd
#define SPDPERMMMD      SSPDperm_mmd
#define SPDPERMMETISE   SSPDperm_metis_e
#define SPDPERMMETISN   SSPDperm_metis_n
#define SPDPERMPP       SSPDperm_pp
#define SPDPERMINDSET   SSPDperm_indset

#define SYMPERMNULL     SSYMperm_null
#define SYMPERMND       SSYMperm_nd
#define SYMPERMRCM      SSYMperm_rcm
#define SYMPERMAMF      SSYMperm_amf
#define SYMPERMAMD      SSYMperm_amd
#define SYMPERMMMD      SSYMperm_mmd
#define SYMPERMMETISE   SSYMperm_metis_e
#define SYMPERMMETISN   SSYMperm_metis_n
#define SYMPERMINDSET   SSYMperm_indset

#define PERMMWMRCM    SGNLperm_mwm_rcm
#define PERMMWMMMD    SGNLperm_mwm_mmd
#define PERMMWMAMF    SGNLperm_mwm_amf
#define PERMMWMAMD    SGNLperm_mwm_amd
#define PERMMWMMETISE SGNLperm_mwm_metis_e
#define PERMMWMMETISN SGNLperm_mwm_metis_n

#define SYMPERMMWMRCM    SSYMperm_mwm_rcm
#define SYMPERMMWMMMD    SSYMperm_mwm_mmd
#define SYMPERMMWMAMF    SSYMperm_mwm_amf
#define SYMPERMMWMAMD    SSYMperm_mwm_amd
#define SYMPERMMWMMETISE SSYMperm_mwm_metis_e
#define SYMPERMMWMMETISN SSYMperm_mwm_metis_n

#define PERMMC64RCM    SGNLperm_mc64_rcm
#define PERMMC64MMD    SGNLperm_mc64_mmd
#define PERMMC64AMF    SGNLperm_mc64_amf
#define PERMMC64AMD    SGNLperm_mc64_amd
#define PERMMC64METISE SGNLperm_mc64_metis_e
#define PERMMC64METISN SGNLperm_mc64_metis_n

#define SPARTRAN     Sspartran
#define QQSORT       Sqqsort
#define QSORT        Sqsort
#define QQSORT2      Sqqsort2
#define QQSORTS      Sqqsorts
#define QQSORTS2     Sqqsorts2
#define QSORT2       Sqsort2
#define QSPLIT       Sqsplit
#define QSPLIT2      Sqsplit2
#define QSEPARATE    Sqseparate
#define CLEAR        Sclear
#define INDSET       Sindset
#define PQPERM       SPQpermF
#define PPERM        SPpermF
#define PPPERM       SPPpermF
#define WDIAG        SwDiagRF
#define QSORTR2I     sqsortr2i
#define SWAPM        sswapm
#define WPDIAG       SwPDiagRF
#define SPDWDIAG     SSPDwDiagRF
#define BISINIT      Sbisinit
#define STOPBIS      Sstopbis
#define TIDYCG       Stidycg
#define MGSRO        Smgsro
#define GIVENS       Sgivens
#define BRKDN        Sbrkdn

#define CSRCSC       Scsrcsc
#define CSRCSC2      Scsrcsc2
#define READMTC      Sreadmtc
#define WRITEMTC     Swritemtc
#define READVECTORS  Sreadvectors
#define WRITEVECTORS Swritevectors
#define PCG          Spcg
#define BCG          Sbcg
#define SBCG         SSYMbcg
#define SQMR         SSYMqmr
#define GMRES        Sgmres
#define FGMRES       Sfgmres

#define DISTDOT      sdot
#define DISTDOTU     sdot
#define DISTDOT2     sdot2
#define COPY         scopy
#define AXPY         saxpy
#define ROTG         srotg
#define ROT          srot
#define NRM          snrm2
#define I_AMAX       isamax
#define ASUM         sasum
#define SCAL         sscal

#define MC64I        mc64is
#define MC64A        mc64as
#define MC64IR       mc64is
#define MC64AR       mc64as

#define FABS(A)      (((A)>=0)?(A):(-(A)))
#define ABS(A)       abs(A)
#define FLOATABS(A)  abs(A)
#define FLOATABSNAME abs
#define SQRT(A)      sqrt(A)
#define LOG(A)       log(A)
#define LOG10(A)     log10(A)
#define IREAL(A)     real(A)
#define ABSFNAME     abs
#define SQRTFNAME    sqrt
#define LOGFNAME     log
#define LOGTENFNAME  log10
#define CTOD(A)      (A)
#define CONJ(A)      (A)
#define FNULL        0.0e0
#define FONE         1.0e0
#define RONE         1.0e0
#define RTWO         2.0e0
#define RFOUR        4.0e0
#define RZERO        0.0e0
#define REAL_MAX     1.0e38
#define SIGNUM       1.0e0
#define SIGNUM2      1.0e0
#define TWICE        1




#elif defined _SINGLE_COMPLEX_
#define GETEPS       sgeteps
#define _REAL_MAX_   _S_REAL_MAX_
#define REALS        real
#define FLOAT        complex
#define CSRMAT       Cmat
#define AMGLEVELMAT  CAMGlevelmat
#define ILUPACKPARAM CILUPACKparam
#define GNLAGGRESSIVEDROPPING CGNLaggressivedropping 
#define SPDAGGRESSIVEDROPPING CHPDaggressivedropping 

#define SPTRF        csptrf
#define SPTRS        csptrs

#define ROWSCALE     Crowscale
#define COLSCALE     Ccolscale
#define SPDSCALE     CHPDscale
#define SYMSCALE     CSYMscale
#define CNRMS        Ccnrms
#define RNRMS        Crnrms
#define DIAMUA       CDiagMultA
#define AMUDIA       CAMultDiag

#define CSRMATVEC    CGNLmatvec
#define CSRMATTVEC   CGNLmattvec
#define CSRMATHVEC   CGNLmathvec
#define SYMMATVEC    CSYMmatvec
#define SSMMATVEC    CSSMmatvec
#define HERMATVEC    CHERmatvec
#define SHRMATVEC    CSHRmatvec
#define SETUPGRAPH   Csetupgraph
#define SETUPGRAPH_EPSILON   Csetupgraph_epsilon

#define AMGDELETE       CGNLAMGdelete
#define SPDAMGDELETE    CHPDAMGdelete

#define AMGSETUP        CGNLAMGfactor
#define SPDAMGSETUP     CHPDAMGfactor
#define AMGFACTOR       CGNLAMGfactor
#define SPDAMGFACTOR    CHPDAMGfactor
#define AMGEXTRACT      CGNLAMGextract
#define SPDAMGEXTRACT   CHERAMGextract
#define SYMAMGEXTRACT   CHERAMGextract
#define AMGSOL          CGNLAMGsol
#define AMGDLSOL        CGNLAMGdlsol
#define AMGDUSOL        CGNLAMGdusol
#define AMGLSOL         CGNLAMGlsol
#define AMGUSOL         CGNLAMGusol
#define AMGTDLSOL       CGNLAMGtdlsol
#define AMGTDUSOL       CGNLAMGtdusol
#define AMGTLSOL        CGNLAMGtlsol
#define AMGTUSOL        CGNLAMGtusol
#define AMGTSOL         CGNLAMGtsol
#define SPDAMGSOL       CHPDAMGsol
#define AMGDRIVER       CGNLAMGdriver
#define AMGSOLVER       CGNLAMGsolver
#define SPDAMGSOLVER    CHPDAMGsolver
#define SYMAMGSOLVERS    CSYMAMGsolver
#define SYMAMGSOLVER    CHERAMGsolver
#define AMGINIT         CGNLAMGinit
#define AMGGETPARAMS    CGNLAMGgetparams
#define AMGSETPARAMS    CGNLAMGsetparams
#define SPDAMGINIT      CHPDAMGinit
#define SPDAMGGETPARAMS CHPDAMGgetparams
#define SPDAMGSETPARAMS CHPDAMGsetparams
#define SYMAMGINITS      CSYMAMGinit
#define SYMAMGGETPARAMSS CSYMAMGgetparams
#define SYMAMGSETPARAMSS CSYMAMGsetparams
#define SYMAMGINIT      CHERAMGinit
#define SYMAMGGETPARAMS CHERAMGgetparams
#define SYMAMGSETPARAMS CHERAMGsetparams

#define LDLP         CHPDldlp
#define LDLPSOL      CHPDldlpsol
#define LUPQ         CGNLlupq
#define LUPQSOL      CGNLlupqsol
#define LUPQLSOL     CGNLlupqlsol
#define LUPQUSOL     CGNLlupqusol
#define LUPQDLSOL    CGNLlupqdlsol
#define LUPQDUSOL    CGNLlupqdusol
#define LUPQTSOL     CGNLlupqtsol
#define LUPQTLSOL    CGNLlupqtlsol
#define LUPQTUSOL    CGNLlupqtusol
#define LUPQTDLSOL   CGNLlupqtdlsol
#define LUPQTDUSOL   CGNLlupqtdusol



#define ILDLC        CHERildlc
#define ILDLCSOL     CHERildlcsol
#define ILUC         CGNLiluc
#define PILUC        CGNLpiluc
#define MPILUC       CGNLmpiluc
#define PILDLC       CHPDpiluc
#define MPILDLC      CHPDmpiluc
#define ILUCSOL      CGNLilucsol
#define ILUCTSOL     CGNLiluctsol
#define ILUCDLSOL    CGNLilucdlsol
#define ILUCTDLSOL   CGNLiluctdlsol
#define ILUCDUSOL    CGNLilucdusol
#define ILUCTDUSOL   CGNLiluctdusol
#define ILUCLSOL     CGNLiluclsol
#define ILUCTLSOL    CGNLiluctlsol
#define ILUCUSOL     CGNLilucusol
#define ILUCTUSOL    CGNLiluctusol

#define PILUCDLSOL    CGNLpilucdlsol
#define PILUCTDLSOL   CGNLpiluctdlsol
#define PILUCDUSOL    CGNLpilucdusol
#define PILUCTDUSOL   CGNLpiluctdusol
#define PILUCLSOL     CGNLpiluclsol
#define PILUCTLSOL    CGNLpiluctlsol
#define PILUCUSOL     CGNLpilucusol
#define PILUCTUSOL    CGNLpiluctusol

#define ILUTP        CGNLilutp
#define ILUT         CGNLilut
#define LUSOL        CGNLlusol
#define LUTSOL       CGNLlutsol
#define LULSOL       CGNLlulsol
#define LUTLSOL      CGNLlutlsol
#define LUUSOL       CGNLluusol
#define LUTUSOL      CGNLlutusol
#define LUDUSOL      CGNLludusol
#define LUTDUSOL     CGNLlutdusol
#define LUDLSOL      CGNLludlsol
#define LUTDLSOL     CGNLlutdlsol

#define CPERM        Ccperm
#define RPERM        Crperm

#define PERMNULL     CGNLperm_null
#define PERMND       CGNLperm_nd
#define PERMRCM      CGNLperm_rcm
#define PERMAMF      CGNLperm_amf
#define PERMAMD      CGNLperm_amd
#define PERMMMD      CGNLperm_mmd
#define PERMMETISE   CGNLperm_metis_e
#define PERMMETISN   CGNLperm_metis_n
#define PERMPQ       CGNLperm_pq
#define PERMFC       CGNLperm_fc
#define INDFC        Cindfc
#define SYMPERMFC    CSYMperm_fc
#define SYMINDFC     CSYMindfc
#define SPDPERMFC    CHPDperm_fc
#define SPDINDFC     CHPDindfc
#define PERMP        CGNLperm_p
#define PERMINDSET   CGNLperm_indset

#define PERMMWMRCM    CGNLperm_mwm_rcm
#define PERMMWMMMD    CGNLperm_mwm_mmd
#define PERMMWMAMF    CGNLperm_mwm_amf
#define PERMMWMAMD    CGNLperm_mwm_amd
#define PERMMWMMETISE CGNLperm_mwm_metis_e
#define PERMMWMMETISN CGNLperm_mwm_metis_n

#define SYMPERMMWMRCM    CHERperm_mwm_rcm
#define SYMPERMMWMMMD    CHERperm_mwm_mmd
#define SYMPERMMWMAMF    CHERperm_mwm_amf
#define SYMPERMMWMAMD    CHERperm_mwm_amd
#define SYMPERMMWMMETISE CHERperm_mwm_metis_e
#define SYMPERMMWMMETISN CHERperm_mwm_metis_n

#define PERMMC64RCM    CGNLperm_mc64_rcm
#define PERMMC64MMD    CGNLperm_mc64_mmd
#define PERMMC64AMF    CGNLperm_mc64_amf
#define PERMMC64AMD    CGNLperm_mc64_amd
#define PERMMC64METISE CGNLperm_mc64_metis_e
#define PERMMC64METISN CGNLperm_mc64_metis_n

#define SPDPERMNULL     CHPDperm_null
#define SPDPERMND       CHPDperm_nd
#define SPDPERMRCM      CHPDperm_rcm
#define SPDPERMAMF      CHPDperm_amf
#define SPDPERMAMD      CHPDperm_amd
#define SPDPERMMMD      CHPDperm_mmd
#define SPDPERMMETISE   CHPDperm_metis_e
#define SPDPERMMETISN   CHPDperm_metis_n
#define SPDPERMPP       CHPDperm_pp
#define SPDPERMINDSET   CHPDperm_indset

#define SYMPERMNULL     CHERperm_null
#define SYMPERMND       CHERperm_nd
#define SYMPERMRCM      CHERperm_rcm
#define SYMPERMAMF      CHERperm_amf
#define SYMPERMAMD      CHERperm_amd
#define SYMPERMMMD      CHERperm_mmd
#define SYMPERMMETISE   CHERperm_metis_e
#define SYMPERMMETISN   CHERperm_metis_n
#define SYMPERMINDSET   CHERperm_indset

#define SPARTRAN     Cspartran
#define QQSORT       Cqqsort
#define QSORT        Cqsort
#define QQSORT2      Cqqsort2
#define QSORT2       Cqsort2