diff options
-rw-r--r-- | src/OutputInfo.c | 4 | ||||
-rw-r--r-- | src/WriteInfo.c | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/src/OutputInfo.c b/src/OutputInfo.c index 29580cb..16676e8 100644 --- a/src/OutputInfo.c +++ b/src/OutputInfo.c @@ -30,9 +30,9 @@ CCTK_FILEVERSION(CactusBase_IOBasic_OutputInfo_c) /* the number at which to switch from decimal to exponential notation */ #define DECIMAL_PRECISION 1.0e-8 #define DECIMAL_TOOBIG 1.0e+8 -#define USE_DECIMAL_NOTATION(x) ((fabs (x) > DECIMAL_PRECISION) || \ +#define USE_DECIMAL_NOTATION(x) ((fabs ((double) x) > DECIMAL_PRECISION) || \ ((x) == 0.0) || \ - (fabs(x) < DECIMAL_TOOBIG)) + (fabs ((double) x) < DECIMAL_TOOBIG)) #define PRINT_FORMATTED_REDUCTION_VALUE(reduction) \ if (reduction->is_valid) \ { \ diff --git a/src/WriteInfo.c b/src/WriteInfo.c index 977f548..850d088 100644 --- a/src/WriteInfo.c +++ b/src/WriteInfo.c @@ -184,7 +184,7 @@ int IOBasic_WriteInfo (const cGH *GH, int vindex) /* for CCTK_GF and CCTK_ARRAY variables: loop over all reductions */ while (reduction) { - reduction->is_valid = CCTK_Reduce (GH_fake_const.non_const_ptr, 0, + reduction->is_valid = CCTK_Reduce (GH_fake_const.non_const_ptr, -1, reduction->handle, 1, CCTK_VARIABLE_REAL, &reduction->value, 1, vindex) == 0; |