ilupack.h

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

		  integer (*p) (Cmat, complex *, complex *, integer *,
			    integer *,integer *, CILUPACKparam *),
		  integer (*pf)(Cmat, complex *,  complex *, integer *,
			    integer *,integer *, CILUPACKparam *));
integer CHERAMGfactor(Cmat *, CAMGlevelmat *, integer *, CILUPACKparam *,
		  integer (*p0)(Cmat, complex *, complex *, integer *,
			    integer *,integer *, CILUPACKparam *),
		  integer (*p) (Cmat, complex *, complex *, integer *,
			    integer *,integer *, CILUPACKparam *),
		  integer (*pf)(Cmat, complex *,  complex *, integer *,
			    integer *,integer *, CILUPACKparam *));
integer CSYMAMGfactor(Cmat *, CAMGlevelmat *, integer *, CILUPACKparam *,
		  integer (*p0)(Cmat, complex *, complex *, integer *,
			    integer *,integer *, CILUPACKparam *),
		  integer (*p) (Cmat, complex *, complex *, integer *,
			    integer *,integer *, CILUPACKparam *),
		  integer (*pf)(Cmat, complex *,  complex *, integer *,
			    integer *,integer *, CILUPACKparam *));


void       DGNLilut(integer *,doubleprecision *,integer *,integer *,integer *,
		    doubleprecision *,
		    doubleprecision *,integer *,integer *,integer *, 
		    doubleprecision *,integer *, integer *);
void       DGNLilutp(integer *,doubleprecision *,integer *,integer *,integer *,
		     doubleprecision *,doubleprecision *,integer *,
		     doubleprecision *,integer *,integer *,integer *, 
		     doubleprecision *,integer *,integer *,integer *);
void       DGNLlusol (integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,integer *);
void       DGNLlutsol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,integer *);
void       DGNLludlsol (integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,integer *);
void       DGNLlutdlsol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,integer *);
void       DGNLludusol (integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,integer *);
void       DGNLlutdusol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,integer *);
void       DGNLlulsol (integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,integer *);
void       DGNLlutlsol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,integer *);
void       DGNLluusol (integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,integer *);
void       DGNLlutusol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,integer *);

void       SGNLilut(integer *,real *,integer *,integer *,integer *,
		    real *,
		    real *,integer *,integer *,integer *, 
		    real *,integer *, integer *);
void       SGNLilutp(integer *,real *,integer *,integer *,integer *,
		     real *,real *,integer *,
		     real *,integer *,integer *,integer *, 
		     real *,integer *,integer *,integer *);
void       SGNLlusol (integer *,real *,real *,real *,integer *,integer *);
void       SGNLlutsol(integer *,real *,real *,real *,integer *,integer *);
void       SGNLlulsol (integer *,real *,real *,real *,integer *,integer *);
void       SGNLlutlsol(integer *,real *,real *,real *,integer *,integer *);
void       SGNLluusol (integer *,real *,real *,real *,integer *,integer *);
void       SGNLlutusol(integer *,real *,real *,real *,integer *,integer *);
void       SGNLludlsol (integer *,real *,real *,real *,integer *,integer *);
void       SGNLlutdlsol(integer *,real *,real *,real *,integer *,integer *);
void       SGNLludusol (integer *,real *,real *,real *,integer *,integer *);
void       SGNLlutdusol(integer *,real *,real *,real *,integer *,integer *);

void       ZGNLilut (integer *,doublecomplex *,integer *,integer *,integer *,
		     doubleprecision *,
		     doublecomplex *,integer *,integer *,integer *, 
		     doublecomplex *,integer *,integer *);
void       ZGNLilutp(integer *,doublecomplex *,integer *,integer *,integer *,
		     doubleprecision *,doubleprecision *,integer *,
		     doublecomplex *,integer *,integer *,integer *, 
		     doublecomplex *,integer *,integer *,integer *);
void       ZGNLlusol (integer *,doublecomplex *,doublecomplex *,doublecomplex *,integer *,integer *);
void       ZGNLlutsol(integer *,doublecomplex *,doublecomplex *,doublecomplex *,integer *,integer *);
void       ZGNLlulsol (integer *,doublecomplex *,doublecomplex *,doublecomplex *,integer *,integer *);
void       ZGNLlutlsol(integer *,doublecomplex *,doublecomplex *,doublecomplex *,integer *,integer *);
void       ZGNLluusol (integer *,doublecomplex *,doublecomplex *,doublecomplex *,integer *,integer *);
void       ZGNLlutusol(integer *,doublecomplex *,doublecomplex *,doublecomplex *,integer *,integer *);
void       ZGNLludlsol (integer *,doublecomplex *,doublecomplex *,doublecomplex *,integer *,integer *);
void       ZGNLlutdlsol(integer *,doublecomplex *,doublecomplex *,doublecomplex *,integer *,integer *);
void       ZGNLludusol (integer *,doublecomplex *,doublecomplex *,doublecomplex *,integer *,integer *);
void       ZGNLlutdusol(integer *,doublecomplex *,doublecomplex *,doublecomplex *,integer *,integer *);

void       CGNLilut (integer *,complex *,integer *,integer *,integer *,
		     real *,
		     complex *,integer *,integer *,integer *, 
		     complex *,integer *,integer *);
void       CGNLilutp(integer *,complex *,integer *,integer *,integer *,
		     real *,real *,integer *,
		     complex *,integer *,integer *,integer *, 
		     complex *,integer *,integer *,integer *);
void       CGNLlusol (integer *,complex *,complex *,complex *,integer *,integer *);
void       CGNLlutsol(integer *,complex *,complex *,complex *,integer *,integer *);
void       CGNLlulsol (integer *,complex *,complex *,complex *,integer *,integer *);
void       CGNLlutlsol(integer *,complex *,complex *,complex *,integer *,integer *);
void       CGNLluusol (integer *,complex *,complex *,complex *,integer *,integer *);
void       CGNLlutusol(integer *,complex *,complex *,complex *,integer *,integer *);
void       CGNLludlsol (integer *,complex *,complex *,complex *,integer *,integer *);
void       CGNLlutdlsol(integer *,complex *,complex *,complex *,integer *,integer *);
void       CGNLludusol (integer *,complex *,complex *,complex *,integer *,integer *);
void       CGNLlutdusol(integer *,complex *,complex *,complex *,integer *,integer *);


void DGNLiluc(integer *,doubleprecision *,integer *,integer *,integer *,
	      doubleprecision *,integer *,doubleprecision *,integer *,integer *,
	      integer *,doubleprecision *,integer *,integer *);
void DGNLilucsol (integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,
		  integer *);
void DGNLiluctsol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,
		  integer *);
void DGNLilucdlsol (integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,
		  integer *);
void DGNLiluctdlsol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,
		  integer *);
void DGNLilucdusol (integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,
		  integer *);
void DGNLiluctdusol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,
		  integer *);
void DGNLiluclsol (integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,
		  integer *);
void DGNLiluctlsol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,
		  integer *);
void DGNLilucusol (integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,
		  integer *);
void DGNLiluctusol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,integer *,
		  integer *);

void DGNLpiluclsol  (integer *,integer *, doubleprecision *,doubleprecision *,
		     doubleprecision *,integer *,integer *);
void DGNLpilucdlsol (integer *,integer *, doubleprecision *,doubleprecision *,
		     doubleprecision *,integer *,integer *);
void DGNLpilucusol  (integer *,integer *, doubleprecision *,doubleprecision *,
		     doubleprecision *,integer *,integer *);
void DGNLpilucdusol (integer *,integer *, doubleprecision *,doubleprecision *,
		     doubleprecision *,integer *,integer *);
void DGNLpiluctlsol (integer *,integer *, doubleprecision *,doubleprecision *,
		     doubleprecision *,integer *,integer *);
void DGNLpiluctdlsol(integer *,integer *, doubleprecision *,doubleprecision *,
		     doubleprecision *,integer *,integer *);
void DGNLpiluctusol (integer *,integer *, doubleprecision *,doubleprecision *,
		     doubleprecision *,integer *,integer *);
void DGNLpiluctdusol(integer *,integer *, doubleprecision *,doubleprecision *,
		     doubleprecision *,integer *,integer *);

void DSYMildlc(integer *,doubleprecision *,integer *,integer *,integer *,
	       doubleprecision *,integer *,doubleprecision *,integer *,integer *,
	       doubleprecision *,integer *,integer *);
void DSYMildlcsol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,
		 integer *);
void DSYMpilucsol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,
		 integer *);
void DSSMildlc(integer *,doubleprecision *,integer *,integer *,integer *,
	       doubleprecision *,integer *,doubleprecision *,integer *,integer *,
	       doubleprecision *,integer *,integer *);
void DSSMildlcsol(integer *,doubleprecision *,doubleprecision *,doubleprecision *,
		 integer *);
void DGNLpiluc(integer *,doubleprecision *,integer *,integer *,integer *,doubleprecision *,
	       doubleprecision *,integer *,integer *,integer *,integer *,
	       doubleprecision *,integer *,integer *,integer *,doubleprecision *,integer *,
	       integer *, doubleprecision *, integer*);
void DGNLspiluc(integer *,doubleprecision *,integer *,integer *,integer *,doubleprecision *,
		doubleprecision *,integer *,integer *,integer *,integer *,
		doubleprecision *,integer *,integer *,integer *,doubleprecision *,integer *,
		integer *, doubleprecision *, integer*);
void DGNLmpiluc(integer *,doubleprecision *,integer *,integer *,integer *,doubleprecision *,
		doubleprecision *,doubleprecision *,integer *,integer *,integer *,integer *,
		doubleprecision *,integer *,integer *,integer *,doubleprecision *,integer *,
		integer *, doubleprecision *, integer *);
void DSPDpiluc(integer *,doubleprecision *,integer *,integer *,integer *,doubleprecision *,
	       doubleprecision *,integer *,integer *,integer *,integer *,
	       doubleprecision *,integer *,integer *,doubleprecision *,integer *,
	       integer *, doubleprecision *, integer *);
void DSPDmpiluc(integer *,doubleprecision *,integer *,integer *,integer *,doubleprecision *,
		doubleprecision *,doubleprecision *,integer *,integer *,integer *,integer *,
		doubleprecision *,integer *,integer *,doubleprecision *,integer *,
		integer *, doubleprecision *, integer *);
void DSYMpiluc(integer *,doubleprecision *,integer *,integer *,integer *,doubleprecision *,
	       doubleprecision *,integer *,integer *,integer *,integer *,
	       doubleprecision *,integer *,integer *,doubleprecision *,integer *,
	       integer *, doubleprecision *, integer *);
void DSYMmpiluc(integer *,doubleprecision *,integer *,integer *,integer *,doubleprecision *,
		doubleprecision *,doubleprecision *,integer *,integer *,integer *,integer *,
		doubleprecision *,integer *,integer *,doubleprecision *,integer *,
		integer *, doubleprecision *, integer *);

void DSYMiluc(integer *,doubleprecision *,integer *,integer *,integer *,doubleprecision *,
	       integer *,integer *,integer *,
	       doubleprecision *,integer *,integer *,doubleprecision *,integer *,
	       integer *);
void SGNLiluc(integer *,real *,integer *,integer *,integer *,
	      real *,integer *,real *,integer *,integer *,
	      integer *,real *,integer *,integer *);
void SGNLilucsol (integer *,real *,real *,real *,integer *,
		  integer *);
void SGNLiluctsol(integer *,real *,real *,real *,integer *,
		  integer *);
void SGNLilucdlsol (integer *,real *,real *,real *,integer *,
		  integer *);
void SGNLiluctdlsol(integer *,real *,real *,real *,integer *,
		  integer *);
void SGNLilucdusol (integer *,real *,real *,real *,integer *,
		  integer *);
void SGNLiluctdusol(integer *,real *,real *,real *,integer *,
		  integer *);
void SGNLiluclsol (integer *,real *,real *,real *,integer *,
		  integer *);
void SGNLiluctlsol(integer *,real *,real *,real *,integer *,
		  integer *);
void SGNLilucusol (integer *,real *,real *,real *,integer *,
		  integer *);
void SGNLiluctusol(integer *,real *,real *,real *,integer *,
		  integer *);

void SGNLpiluclsol  (integer *,integer *, real *,real *,
		     real *,integer *,integer *);
void SGNLpilucdlsol (integer *,integer *, real *,real *,
		     real *,integer *,integer *);
void SGNLpilucusol  (integer *,integer *, real *,real *,
		     real *,integer *,integer *);
void SGNLpilucdusol (integer *,integer *, real *,real *,
		     real *,integer *,integer *);
void SGNLpiluctlsol (integer *,integer *, real *,real *,
		     real *,integer *,integer *);
void SGNLpiluctdlsol(integer *,integer *, real *,real *,
		     real *,integer *,integer *);
void SGNLpiluctusol (integer *,integer *, real *,real *,
		     real *,integer *,integer *);
void SGNLpiluctdusol(integer *,integer *, real *,real *,
		     real *,integer *,integer *);

void SSYMildlc(integer *,real *,integer *,integer *,integer *,
	       real *,integer *,real *,integer *,integer *,
	       real *,integer *,integer *);
void SSYMildlcsol(integer *,real *,real *,real *,
		 integer *);
void SSYMpilucsol(integer *,real *,real *,real *,
		 integer *);
void SSSMildlc(integer *,real *,integer *,integer *,integer *,
	       real *,integer *,real *,integer *,integer *,
	       real *,integer *,integer *);
void SSSMildlcsol(integer *,real *,real *,real *,
		 integer *);
void SGNLpiluc(integer *,real *,integer *,integer *,integer *,real *,
	       real *,integer *,integer *,integer *,integer *,
	       real *,integer *,integer *,integer *,real *,integer *,
	       integer *, real *, integer *);
void SGNLspiluc(integer *,real *,integer *,integer *,integer *,real *,
		real *,integer *,integer *,integer *,integer *,
		real *,integer *,integer *,integer *,real *,integer *,
		integer *, real *, integer *);
void SGNLmpiluc(integer *,real *,integer *,integer *,integer *,real *,
		real *,real *,integer *,integer *,integer *,integer *,
		real *,integer *,integer *,integer *,real *,integer *,
		integer *, real *, integer *);
void SSPDpiluc(integer *,real *,integer *,integer *,integer *,real *,
	       real *,integer *,integer *,integer *,integer *,
	       real *,integer *,integer *,real *,integer *,
	       integer *, real *, integer *);
void SSPDmpiluc(integer *,real *,integer *,integer *,integer *,real *,
		real *,real *,integer *,integer *,integer *,integer *,
		real *,integer *,integer *,real *,integer *,
		integer *, real *, integer *);
void SSYMpiluc(integer *,real *,integer *,integer *,integer *,real *,
	       real *,integer *,integer *,integer *,integer *,