diff options
| author | pollney <pollney@b7a48df3-cbbf-4440-997f-b4b717c9f7fc> | 2003-06-26 11:38:34 +0000 |
|---|---|---|
| committer | pollney <pollney@b7a48df3-cbbf-4440-997f-b4b717c9f7fc> | 2003-06-26 11:38:34 +0000 |
| commit | 5874f2056f8e9fe3628b319392aac529d101d965 (patch) | |
| tree | 97e626176e2ce6989484d167961110f4602dd02e | |
| parent | 9c099b5f4367367794b8cd0e06021319f02e2ce9 (diff) | |
Update for 4th order differencing.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/ADMConstraints/trunk@89 b7a48df3-cbbf-4440-997f-b4b717c9f7fc
| -rw-r--r-- | param.ccl | 4 | ||||
| -rw-r--r-- | src/ADMConstraints.F | 7 |
2 files changed, 7 insertions, 4 deletions
@@ -13,6 +13,10 @@ shares: StaticConformal USES KEYWORD conformal_storage +shares: ADMMacros + +USES INT spatial_order + private: BOOLEAN constraints_persist "Keep storage of ham and mom* around for use in special tricks?" diff --git a/src/ADMConstraints.F b/src/ADMConstraints.F index ef5de5d..cb8db2f 100644 --- a/src/ADMConstraints.F +++ b/src/ADMConstraints.F @@ -49,11 +49,12 @@ c Return code from Cactus sync routine and boundary conditions. c Various real variables. - CCTK_REAL dx,dy,dz CCTK_REAL m_rho,m_sx,m_sy,m_sz CCTK_REAL pi,ialp,ialp2 CCTK_REAL det,uxx,uyy,uzz,uxy,uxz,uyz +#include "CactusEinstein/ADMMacros/src/macro/ADM_Spacing_declare.h" + c Temporaries for the Stress-Energy tensor. CCTK_REAL Ttt,Ttx,Tty,Ttz,Txx,Txy,Txz,Tyy,Tyz,Tzz @@ -79,9 +80,7 @@ c -------------------------------------------------------------- c Grid parameters. - dx = CCTK_DELTA_SPACE(1) - dy = CCTK_DELTA_SPACE(2) - dz = CCTK_DELTA_SPACE(3) +#include "CactusEinstein/ADMMacros/src/macro/ADM_Spacing.h" nx = cctk_lsh(1) ny = cctk_lsh(2) |