diff options
Diffstat (limited to 'src/macro/DYZDG_guts.h')
-rw-r--r-- | src/macro/DYZDG_guts.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/macro/DYZDG_guts.h b/src/macro/DYZDG_guts.h index d380626..4cf3d45 100644 --- a/src/macro/DYZDG_guts.h +++ b/src/macro/DYZDG_guts.h @@ -25,7 +25,7 @@ DYZDG_OO4DYDZ = 1D0/(4D0*dy*dz) /* Factor involving 2nd derivative of conformal factor */ - IF (conformal_state /= CONFORMAL_METRIC) THEN + IF (conformal_state .eq. 0) THEN DYZDG_FAC = 0 ELSE DYZDG_FAC = DYDG_PSI4*(4*DYZDG_DYZDPSI_O_PSI + 12*DYDG_DYDPSI_O_PSI*DZDG_DZDPSI_O_PSI) @@ -61,7 +61,7 @@ #ifdef CCODE /* Factor involving 2nd derivative of conformal factor */ - DYZDG_FAC = ((*conformal_state != CONFORMAL_METRIC)?0: + DYZDG_FAC = ((*conformal_state == 0)?0: DYDG_PSI4*(4*DYZDG_DYZDPSI_O_PSI + 12*DYDG_DYDPSI_O_PSI*DZDG_DZDPSI_O_PSI)); /* Now calculate the second deriatives */ |