diff options
Diffstat (limited to 'src/Ell_Interface.c')
| -rw-r--r-- | src/Ell_Interface.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/Ell_Interface.c b/src/Ell_Interface.c index c338110..a02ce21 100644 --- a/src/Ell_Interface.c +++ b/src/Ell_Interface.c @@ -93,7 +93,7 @@ int Ell_LinConfMetricSolver(cGH *GH, } -void FMODIFIER FORTRAN_NAME(Ell_LinConfMetricSolver) +void CCTK_FCALL CCTK_FNAME(Ell_LinConfMetricSolver) (int *ierr, cGH *GH, int *MetricPsi, @@ -179,7 +179,7 @@ int Ell_LinMetricSolver(cGH *GH, return(retval); } -void FMODIFIER FORTRAN_NAME(Ell_LinMetricSolver) +void CCTK_FCALL CCTK_FNAME(Ell_LinMetricSolver) (int *ierr, cGH *GH, int *Metric, @@ -263,7 +263,7 @@ int Ell_LinFlatSolver(cGH *GH, return retval; } -void FMODIFIER FORTRAN_NAME(Ell_LinFlatSolver) +void CCTK_FCALL CCTK_FNAME(Ell_LinFlatSolver) (int *ierr, cGH *GH, int *FieldIndex, @@ -348,7 +348,7 @@ int Ell_BrBrConfMetricSolver(cGH *GH, } -void FMODIFIER FORTRAN_NAME(Ell_BrBrConfMetricSolver) +void CCTK_FCALL CCTK_FNAME(Ell_BrBrConfMetricSolver) (int *ierr, cGH *GH, int *MetricPsi, @@ -435,7 +435,7 @@ int Ell_PolyConfMetricSolver(cGH *GH, } -void FMODIFIER FORTRAN_NAME(Ell_PolyConfMetricSolver) +void CCTK_FCALL CCTK_FNAME(Ell_PolyConfMetricSolver) (int *ierr, cGH *GH, int *MetricPsi, |