diff options
author | schnetter <schnetter@f47d718b-0e4f-0410-8445-f2f96c8ccefb> | 2004-02-05 13:02:19 +0000 |
---|---|---|
committer | schnetter <schnetter@f47d718b-0e4f-0410-8445-f2f96c8ccefb> | 2004-02-05 13:02:19 +0000 |
commit | 3c4efa5d0aee2452f15b77db71f0fc5949f42937 (patch) | |
tree | e7f4e7807e8cdc6a8378f519fa02c0fa748c74c6 /interface.ccl | |
parent | c6f93b6845240934fdacd090e7c9fc9757981de8 (diff) |
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
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 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 |