# 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_TO_CONST IN cctkGH, \
                     CCTK_INT IN dir, \
                     CCTK_STRING IN var_name, \
                     CCTK_STRING IN dvar_name )
PROVIDES FUNCTION Diff_gf WITH DiffGf LANGUAGE C

SUBROUTINE Diff_gv ( CCTK_POINTER_TO_CONST IN cctkGH, \
                     CCTK_INT IN dir, \
                     CCTK_REAL IN ARRAY var, \
                     CCTK_REAL OUT ARRAY dvar )
PROVIDES FUNCTION Diff_gv WITH DiffGv LANGUAGE C

CCTK_REAL FUNCTION GetScalProdCoeff ()
PROVIDES FUNCTION GetScalProdCoeff WITH GetCoeff LANGUAGE Fortran

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

CCTK_INT FUNCTION \
    SymmetryTableHandleForGrid (CCTK_POINTER_TO_CONST IN cctkGH)
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"