asc26 amss-ncku initialized

This commit is contained in:
2026-01-13 15:01:15 +08:00
commit f2fc9af70e
272 changed files with 262274 additions and 0 deletions

24
AMSS_NCKU_source/ilucg.h Normal file
View File

@@ -0,0 +1,24 @@
#ifndef ILUCG_H
#define ILUCG_H
#ifdef fortran1
#define f_ilucg ilucg
#endif
#ifdef fortran2
#define f_ilucg ILUCG
#endif
#ifdef fortran3
#define f_ilucg ilucg_
#endif
extern "C"
{
void f_ilucg(const int &N,
const int *IA, const int *JA, const double *A,
const double *B, double *X,
int *ITEMP, double *RTEMP,
const double &EPS, const int &ITER, int &ISTATUS);
}
#endif /* ILUCG_H */