diff options
author | diener <diener@f69c4107-0314-4c4f-9ad4-17e986b73f4a> | 2004-10-11 20:16:00 +0000 |
---|---|---|
committer | diener <diener@f69c4107-0314-4c4f-9ad4-17e986b73f4a> | 2004-10-11 20:16:00 +0000 |
commit | 785d14d7d111a1120b9595385c38dde6267ade95 (patch) | |
tree | 87b09dee9a4dff8e3520a02fb188f185690a27c4 /interface.ccl | |
parent | 820cf085c7fba79fa34163a535e5d7a37f1a2697 (diff) |
Added 4-3 Full restricted norm operators. Added parameter to choose the type
of differences (diagonal, full restricted). Added routine to return the
coefficient of the norm at the boundary. Added routine to return the
mask for the norm calculation.
git-svn-id: https://svn.cct.lsu.edu/repos/numrel/LSUThorns/SummationByParts/trunk@10 f69c4107-0314-4c4f-9ad4-17e986b73f4a
Diffstat (limited to 'interface.ccl')
-rw-r--r-- | interface.ccl | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/interface.ccl b/interface.ccl index 9eef8aa..c05a3c1 100644 --- a/interface.ccl +++ b/interface.ccl @@ -25,6 +25,13 @@ SUBROUTINE Diff_gv ( CCTK_POINTER IN cctkGH, \ CCTK_REAL OUT ARRAY dvar ) 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, \ @@ -35,3 +42,10 @@ CCTK_INT FUNCTION GetDomainSpecification \ 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 |