diff options
Diffstat (limited to 'interface.ccl')
-rw-r--r-- | interface.ccl | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/interface.ccl b/interface.ccl index 037875e..562a180 100644 --- a/interface.ccl +++ b/interface.ccl @@ -12,6 +12,32 @@ SUBROUTINE SetDriftCorrectPosition ( CCTK_POINTER_TO_CONST IN GH_Pointer, \ USES FUNCTION SetDriftCorrectPosition +SUBROUTINE ConfToPhysInPlace (CCTK_INT IN nx, \ + CCTK_INT IN ny, \ + CCTK_INT IN nz, \ + CCTK_REAL ARRAY IN psi, \ + CCTK_REAL ARRAY INOUT gxx, \ + CCTK_REAL ARRAY INOUT gxy, \ + CCTK_REAL ARRAY INOUT gxz, \ + CCTK_REAL ARRAY INOUT gyy, \ + CCTK_REAL ARRAY INOUT gyz, \ + CCTK_REAL ARRAY INOUT gzz) + +USES FUNCTION ConfToPhysInPlace + +SUBROUTINE PhysToConfInPlace (CCTK_INT IN nx, \ + CCTK_INT IN ny, \ + CCTK_INT IN nz, \ + CCTK_REAL ARRAY IN psi, \ + CCTK_REAL ARRAY INOUT gxx, \ + CCTK_REAL ARRAY INOUT gxy, \ + CCTK_REAL ARRAY INOUT gxz, \ + CCTK_REAL ARRAY INOUT gyy, \ + CCTK_REAL ARRAY INOUT gyz, \ + CCTK_REAL ARRAY INOUT gzz) + +USES FUNCTION PhysToConfInPlace + ################################ ### PUBLIC GRID FUNCTIONS ### ################################ |