diff options
Diffstat (limited to 'interface.ccl')
-rw-r--r-- | interface.ccl | 31 |
1 files changed, 23 insertions, 8 deletions
diff --git a/interface.ccl b/interface.ccl index 381ac63..bc6c63b 100644 --- a/interface.ccl +++ b/interface.ccl @@ -71,15 +71,11 @@ PROVIDES FUNCTION GetScalProdDiag WITH SBP_GetScalProdDiag LANGUAGE Fortran CCTK_REAL FUNCTION GetScalProdCoeff () PROVIDES FUNCTION GetScalProdCoeff WITH GetCoeff LANGUAGE Fortran -SUBROUTINE GetFDGridOffsets ( CCTK_INT OUT ARRAY offset ) -PROVIDES FUNCTION GetFDGridOffsets WITH get_grid_offsets LANGUAGE C - -SUBROUTINE GetLSHIndexRanges ( \ +SUBROUTINE GetLshIndexRanges ( \ CCTK_POINTER_TO_CONST IN cctkGH, \ - CCTK_INT OUT imn, CCTK_INT OUT imx, \ - CCTK_INT OUT jmn, CCTK_INT OUT jmx, \ - CCTK_INT OUT kmn, CCTK_INT OUT kmx ) -PROVIDES FUNCTION GetLSHIndexRanges WITH get_lsh_iranges LANGUAGE C + CCTK_INT OUT ARRAY imin, \ + CCTK_INT OUT ARRAY imax ) +PROVIDES FUNCTION GetLshIndexRanges WITH get_lsh_iranges LANGUAGE C CCTK_INT FUNCTION GetDomainSpecification \ (CCTK_INT IN size, \ @@ -92,6 +88,25 @@ CCTK_INT FUNCTION GetDomainSpecification \ CCTK_REAL OUT ARRAY spacing) USES FUNCTION GetDomainSpecification +CCTK_INT FUNCTION \ + GetBoundarySpecification \ + (CCTK_INT IN size, \ + CCTK_INT OUT ARRAY nboundaryzones, \ + CCTK_INT OUT ARRAY is_internal, \ + CCTK_INT OUT ARRAY is_staggered, \ + CCTK_INT OUT ARRAY shiftout) +USES FUNCTION GetBoundarySpecification + +CCTK_INT FUNCTION \ + MultiPatch_GetBoundarySpecification \ + (CCTK_INT IN map, \ + CCTK_INT IN size, \ + CCTK_INT OUT ARRAY nboundaryzones, \ + CCTK_INT OUT ARRAY is_internal, \ + CCTK_INT OUT ARRAY is_staggered, \ + CCTK_INT OUT ARRAY shiftout) +USES FUNCTION MultiPatch_GetBoundarySpecification + CCTK_INT FUNCTION \ SymmetryTableHandleForGrid (CCTK_POINTER_TO_CONST IN cctkGH) REQUIRES FUNCTION SymmetryTableHandleForGrid |