diff options
Diffstat (limited to 'interface.ccl')
| -rw-r--r-- | interface.ccl | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/interface.ccl b/interface.ccl index c05a3c1..924cabc 100644 --- a/interface.ccl +++ b/interface.ccl @@ -28,10 +28,6 @@ PROVIDES FUNCTION Diff_gv WITH DiffGv LANGUAGE C CCTK_REAL FUNCTION GetScalProdCoeff () PROVIDES FUNCTION GetScalProdCoeff WITH GetCoeff LANGUAGE Fortran -SUBROUTINE SetNormMask ( CCTK_POINTER IN cctkGH, \ - CCTK_REAL OUT ARRAY mask ) -PROVIDES FUNCTION SetNormMask WITH SetNMask LANGUAGE C - CCTK_INT FUNCTION GetDomainSpecification \ (CCTK_INT IN size, \ CCTK_REAL OUT ARRAY physical_min, \ @@ -49,3 +45,12 @@ REQUIRES FUNCTION SymmetryTableHandleForGrid CCTK_INT FUNCTION SymmetryHandleOfName (CCTK_STRING IN sym_name) REQUIRES FUNCTION SymmetryHandleOfName + + + +public + +CCTK_REAL normmask TYPE=gf TAGS='tensortypealias="scalar" Prolongation="None"' +{ + nmask +} "Mask for the norm calculation" |