diff options
author | allen <allen@b1d164ef-f17a-46e7-89d4-021c7118ef4e> | 1999-10-17 10:52:12 +0000 |
---|---|---|
committer | allen <allen@b1d164ef-f17a-46e7-89d4-021c7118ef4e> | 1999-10-17 10:52:12 +0000 |
commit | 40ff2e7f9eb54cf3b7b20f8879543d5f2113f8c0 (patch) | |
tree | 7c6d20f2a047e40dd7899cdea4fc87c4d5176cf7 /src/macro/DYDG_guts.h | |
parent | f11bff8768bc19ff81f444c951e2b201d1461ddd (diff) |
Fixing up macros for C
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinBase/ADMMacros/trunk@13 b1d164ef-f17a-46e7-89d4-021c7118ef4e
Diffstat (limited to 'src/macro/DYDG_guts.h')
-rw-r--r-- | src/macro/DYDG_guts.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/macro/DYDG_guts.h b/src/macro/DYDG_guts.h index 2dea9f3..3aaae66 100644 --- a/src/macro/DYDG_guts.h +++ b/src/macro/DYDG_guts.h @@ -37,9 +37,9 @@ #ifdef CCODE - DYDG_PSI4 = ((conformal_state != CONFORMAL_METRIC)?1:Power(DYDG_PSI,4)); + DYDG_PSI4 = ((*conformal_state != CONFORMAL_METRIC)?1:DYDG_PSI*DYDG_PSI*DYDG_PSI*DYDG_PSI); - DYDG_FAC = ((conformal_state != CONFORMAL_METRIC)?0:4*DYDG_PSI4*DYDG_DYDPSI_O_PSI); + DYDG_FAC = ((*conformal_state != CONFORMAL_METRIC)?0:4*DYDG_PSI4*DYDG_DYDPSI_O_PSI); DYDG_DYDGXX = DYDCG_DYDCGXX*DYDG_PSI4 + DYDG_FAC*DYDG_GXX; DYDG_DYDGXY = DYDCG_DYDCGXY*DYDG_PSI4 + DYDG_FAC*DYDG_GXY; |