diff options
Diffstat (limited to 'interface.ccl')
| -rw-r--r-- | interface.ccl | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/interface.ccl b/interface.ccl new file mode 100644 index 0000000..c306db4 --- /dev/null +++ b/interface.ccl @@ -0,0 +1,31 @@ +# Interface definition for thorn SummationByParts +# $Header$ + +implements: SummationByParts +inherits: grid + +#SUBROUTINE Diff_gf ( CCTK_REAL IN ARRAY var, \ +# CCTK_INT IN ni, \ +# CCTK_INT IN nj, \ +# CCTK_INT IN nk, \ +# CCTK_INT IN dir, \ +# CCTK_REAL IN delta, \ +# CCTK_REAL OUT ARRAY dvar ) +#PROVIDES FUNCTION Diff_gf WITH deriv_gf LANGUAGE Fortran + +SUBROUTINE Diff_gf ( CCTK_POINTER IN cctkGH, \ + CCTK_INT IN dir, \ + CCTK_STRING IN var_name, \ + CCTK_STRING IN dvar_name ) +PROVIDES FUNCTION Diff_gf WITH DiffGf LANGUAGE C + +CCTK_INT FUNCTION GetDomainSpecification \ + (CCTK_INT IN size, \ + CCTK_REAL OUT ARRAY physical_min, \ + CCTK_REAL OUT ARRAY physical_max, \ + CCTK_REAL OUT ARRAY interior_min, \ + CCTK_REAL OUT ARRAY interior_max, \ + CCTK_REAL OUT ARRAY exterior_min, \ + CCTK_REAL OUT ARRAY exterior_max, \ + CCTK_REAL OUT ARRAY spacing) +USES FUNCTION GetDomainSpecification |