From 3c4efa5d0aee2452f15b77db71f0fc5949f42937 Mon Sep 17 00:00:00 2001 From: schnetter Date: Thu, 5 Feb 2004 13:02:19 +0000 Subject: Use function aliasing to convert between physical and conformal metric. Fix severe indexing bug in calculating K_ij. Use new ADMBase convention for not initialising the fields. git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/CalcK/trunk@6 f47d718b-0e4f-0410-8445-f2f96c8ccefb --- interface.ccl | 26 ++++++++++++++++++++++++++ 1 file changed, 26 insertions(+) (limited to 'interface.ccl') diff --git a/interface.ccl b/interface.ccl index d4dc0ca..cd74515 100644 --- a/interface.ccl +++ b/interface.ccl @@ -30,3 +30,29 @@ CCTK_INT FUNCTION Boundary_SelectGroupForBC ( \ CCTK_STRING IN group_name, \ CCTK_STRING IN bc_name) USES FUNCTION Boundary_SelectGroupForBC + + + +void FUNCTION 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 + +void FUNCTION 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 -- cgit v1.2.3