diff options
Diffstat (limited to 'src/sor_wrapper.c')
| -rw-r--r-- | src/sor_wrapper.c | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/src/sor_wrapper.c b/src/sor_wrapper.c index f79f806..a0b3eac 100644 --- a/src/sor_wrapper.c +++ b/src/sor_wrapper.c @@ -22,6 +22,19 @@ #include "cctk_parameters.h" #include "cctk_FortranString.h" +void FORTRAN_NAME(sor_confmetric_core3d)(_CCTK_C2F_PROTO(GH), + int *, CCTK_REAL *, + int *, CCTK_REAL *, + CCTK_REAL *, + CCTK_REAL *,CCTK_REAL *,CCTK_REAL *, + CCTK_REAL *,CCTK_REAL *,CCTK_REAL *, + CCTK_REAL *, int *, CCTK_REAL *, CCTK_REAL *); + +void FORTRAN_NAME(sor_flat_core3d)(_CCTK_C2F_PROTO(GH), + int *, CCTK_REAL *, + int *, CCTK_REAL *, + CCTK_REAL *, int *, CCTK_REAL *, CCTK_REAL *); + /* We pass in the arguments that are neccessary for this class of elliptic eq. this solver is intended to solve. See ./CactusElliptic/EllBase/src/ for the classes of elliptic eq. */ |