namesilupack.h

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

#ifndef _NAMES_ILUPACK_H
#define _NAMES_ILUPACK_H

#include "f2c.h"


/* on several architectures names of fortran routines are passed to C in 
   different ways. To cover this different architectures use in C only lower
   letters for the fortran names. Dependent on the switch you use they are
   replaced by the correct function name
*/

/* only use capital letters */
#if defined __CAPS__ && !defined __UNDERSCORE__ && !defined __2UNDERSCORES__
#define iprandom            IPRANDOM
#define ipsrandom           IPSRANDOM
#define evaluatetime        EVALUATETIME
#define dprivatesptrs       DPRIVATESPTRS

#define dglprecsetup        DGLPRECSETUP
#define dglprecsol          DGLPRECSOL
#define dglprecdelete       DGLPRECDELETE

#define DSYMAMGsavediag     DSYMAMGSAVEDIAG	  
#define DSYMAMGrestorediag  DSYMAMGRESTOREDIAG

#define samgundoscaling     SAMGUNDOSCALING
#define damgundoscaling     DAMGUNDOSCALING
#define camgundoscaling     CAMGUNDOSCALING
#define zamgundoscaling     ZAMGUNDOSCALING

#define sgnlamginit         SGNLAMGINIT    
#define sgnlamgfactor       SGNLAMGFACTOR         
#define sgnlamgsolver       SGNLAMGSOLVER         
#define sgnlamgsol          SGNLAMGSOL    
#define sgnlamgdelete       SGNLAMGDELETE         
#define sgnlamginfo         SGNLAMGINFO
#define sgnlamgnnz          SGNLAMGNNZ

#define ssymspdamgconvert   SSYMSPDAMGCONVERT
                                              
#define sspdamginit         SSPDAMGINIT   
#define sspdamgfactor       SSPDAMGFACTOR         
#define sspdamgsolver       SSPDAMGSOLVER         
#define sspdamgsol          SSPDAMGSOL    
#define sspdamgdelete       SSPDAMGDELETE         
#define sspdamginfo         SSPDAMGINFO
#define sspdamgnnz          SSPDAMGNNZ
                                              
#define ssymamginit         SSYMAMGINIT   
#define ssymamgfactor       SSYMAMGFACTOR         
#define ssymamgsolver       SSYMAMGSOLVER         
#define ssymamgsol          SSYMAMGSOL    
#define ssymamgdelete       SSYMAMGDELETE         
#define ssymamginfo         SSYMAMGINFO
#define ssymamgnnz          SSYMAMGNNZ
                                              
                                              
#define dgnlamginit         DGNLAMGINIT   
#define dgnlamgfactor       DGNLAMGFACTOR         
#define dgnlamgsolver       DGNLAMGSOLVER         
#define dgnlamgsol          DGNLAMGSOL    
#define dgnlamgdelete       DGNLAMGDELETE         
#define dgnlamginfo         DGNLAMGINFO
#define dgnlamgnnz          DGNLAMGNNZ

#define Dsymspdamgconvert   DSYMSPDAMGCONVERT
                                              
#define dspdamginit         DSPDAMGINIT   
#define dspdamgfactor       DSPDAMGFACTOR         
#define dspdamgsolver       DSPDAMGSOLVER         
#define dspdamgsol          DSPDAMGSOL    
#define dspdamgdelete       DSPDAMGDELETE         
#define dspdamginfo         DSPDAMGINFO
#define dspdamgnnz          DSPDAMGNNZ
                                              
#define dsymamginit         DSYMAMGINIT   
#define dsymamgfactor       DSYMAMGFACTOR         
#define dsymamgsolver       DSYMAMGSOLVER         
#define dsymamgsol          DSYMAMGSOL    
#define dsymamgdelete       DSYMAMGDELETE         
#define dsymamginfo         DSYMAMGINFO
#define dsymamgnnz          DSYMAMGNNZ
                                              
                                              
#define cgnlamginit         CGNLAMGINIT   
#define cgnlamgfactor       CGNLAMGFACTOR         
#define cgnlamgsolver       CGNLAMGSOLVER         
#define cgnlamgsol          CGNLAMGSOL    
#define cgnlamgdelete       CGNLAMGDELETE         
#define cgnlamginfo         CGNLAMGINFO
#define cgnlamgnnz          CGNLAMGNNZ

#define cherhpdamgconvert   CHERHPDAMGCONVERT
                                              
#define chpdamginit         CHPDAMGINIT   
#define chpdamgfactor       CHPDAMGFACTOR         
#define chpdamgsolver       CHPDAMGSOLVER         
#define chpdamgsol          CHPDAMGSOL    
#define chpdamgdelete       CHPDAMGDELETE         
#define chpdamginfo         CHPDAMGINFO
#define chpdamgnnz          CHPDAMGNNZ
                                              
#define cheramginit         CHERAMGINIT   
#define cheramgfactor       CHERAMGFACTOR         
#define cheramgsolver       CHERAMGSOLVER         
#define cheramgsol          CHERAMGSOL    
#define cheramgdelete       CHERAMGDELETE         
#define cheramginfo         CHERAMGINFO
#define cheramgnnz          CHERAMGNNZ
                                              
#define csymamginit         CSYMAMGINIT   
#define csymamgfactor       CSYMAMGFACTOR         
#define csymamgsolver       CSYMAMGSOLVER         
#define csymamgsol          CSYMAMGSOL    
#define csymamgdelete       CSYMAMGDELETE         
#define csymamginfo         CSYMAMGINFO
#define csymamgnnz          CSYMAMGNNZ
                                              
                                              
#define zgnlamginit         ZGNLAMGINIT   
#define zgnlamgfactor       ZGNLAMGFACTOR         
#define zgnlamgsolver       ZGNLAMGSOLVER         
#define zgnlamgsol          ZGNLAMGSOL    
#define zgnlamgdelete       ZGNLAMGDELETE         
#define zgnlamginfo         ZGNLAMGINFO
#define zgnlamgnnz          ZGNLAMGNNZ
                                              
#define zherhpdamgconvert   ZHERHPDAMGCONVERT

#define zhpdamginit         ZHPDAMGINIT   
#define zhpdamgfactor       ZHPDAMGFACTOR         
#define zhpdamgsolver       ZHPDAMGSOLVER         
#define zhpdamgsol          ZHPDAMGSOL    
#define zhpdamgdelete       ZHPDAMGDELETE         
#define zhpdamginfo         ZHPDAMGINFO
#define zhpdamgnnz          ZHPDAMGNNZ
                                              
#define zheramginit         ZHERAMGINIT   
#define zheramgfactor       ZHERAMGFACTOR         
#define zheramgsolver       ZHERAMGSOLVER         
#define zheramgsol          ZHERAMGSOL    
#define zheramgdelete       ZHERAMGDELETE         
#define zheramginfo         ZHERAMGINFO
#define zheramgnnz          ZHERAMGNNZ
                                              
#define zsymamginit         ZSYMAMGINIT   
#define zsymamgfactor       ZSYMAMGFACTOR         
#define zsymamgsolver       ZSYMAMGSOLVER         
#define zsymamgsol          ZSYMAMGSOL    
#define zsymamgdelete       ZSYMAMGDELETE     
#define zsymamginfo         ZSYMAMGINFO
#define zsymamgnnz          ZSYMAMGNNZ


#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 DGNLspiluc          DGNLSPILUC
#define DGNLmpiluc          DGNLMPILUC
#define DSPDpiluc           DSPDPILUC
#define DSPDmpiluc          DSPDMPILUC

#define DSYMiluc            DSYMILUC
#define DSYMpiluc           DSYMPILUC
#define DSYMmpiluc          DSYMMPILUC
#define DSYMpilucsol        DSYMPILUCSOL
#define DSYMpiluclsol       DSYMPILUCLSOL
#define DSYMpilucusol       DSYMPILUCUSOL


#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        SSSMILDLCSOL
#define SGNLpiluc           SGNLPILUC
#define SGNLspiluc          SGNLSPILUC
#define SGNLmpiluc          SGNLMPILUC
#define SSPDpiluc           SSPDPILUC
#define SSPDmpiluc          SSPDMPILUC
#define SSYMpiluc           SSYMPILUC
#define SSYMiluc            SSYMILUC
#define SSYMmpiluc          SSYMMPILUC
#define SSYMpilucsol        SSYMPILUCSOL
#define SSYMpiluclsol       SSYMPILUCLSOL
#define SSYMpilucusol       SSYMPILUCUSOL


#define Spcg                SPCG
#define Sbcg                SBCG
#define SSYMbcg             SSYMBCG
#define SSYMqmr             SSYMQMR
#define Sgmres              SGMRES
#define Sfgmres             SFGMRES
#define Sdistdot            SDISTDOT


#define Sroscal             SROSCAL
#define Scoscal             SCOSCAL
#define Srowscale           SROWSCALE
#define Scolscale           SCOLSCALE
#define SSPDscale           SSPDSCALE
#define SSYMscale           SSYMSCALE
#define Scsrcsc             SCSRCSC
#define Sqqsort             SQQSORT
#define Sqqsort2            SQQSORT2
#define Sqqsorts            SQQSORTS
#define Sqqsorts2           SQQSORTS2

#define Sreadmtc            SREADMTC
#define Swritemtc           SWRITEMTC
#define Sreadvectors        SREADVECTORS
#define Swritevectors       SWRITEVECTORS