diff options
Diffstat (limited to 'ML_ADM/src/ML_ADM_convertToADMBase.cc')
-rw-r--r-- | ML_ADM/src/ML_ADM_convertToADMBase.cc | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/ML_ADM/src/ML_ADM_convertToADMBase.cc b/ML_ADM/src/ML_ADM_convertToADMBase.cc index 4779ec8..2d9ddf8 100644 --- a/ML_ADM/src/ML_ADM_convertToADMBase.cc +++ b/ML_ADM/src/ML_ADM_convertToADMBase.cc @@ -90,9 +90,9 @@ static void ML_ADM_convertToADMBase_Body(cGH const * restrict const cctkGH, int CCTK_REAL_VEC const p1o840dx = kdiv(ToReal(0.00119047619047619047619047619048),dx); CCTK_REAL_VEC const p1o840dy = kdiv(ToReal(0.00119047619047619047619047619048),dy); CCTK_REAL_VEC const p1o840dz = kdiv(ToReal(0.00119047619047619047619047619048),dz); - CCTK_REAL_VEC const p1odx2 = kdiv(ToReal(1),kmul(dx,dx)); - CCTK_REAL_VEC const p1ody2 = kdiv(ToReal(1),kmul(dy,dy)); - CCTK_REAL_VEC const p1odz2 = kdiv(ToReal(1),kmul(dz,dz)); + CCTK_REAL_VEC const p1odx2 = kdiv(ToReal(1.),kmul(dx,dx)); + CCTK_REAL_VEC const p1ody2 = kdiv(ToReal(1.),kmul(dy,dy)); + CCTK_REAL_VEC const p1odz2 = kdiv(ToReal(1.),kmul(dz,dz)); CCTK_REAL_VEC const pm1o12dx2 = kdiv(ToReal(-0.0833333333333333333333333333333),kmul(dx,dx)); CCTK_REAL_VEC const pm1o12dy2 = kdiv(ToReal(-0.0833333333333333333333333333333),kmul(dy,dy)); CCTK_REAL_VEC const pm1o12dz2 = kdiv(ToReal(-0.0833333333333333333333333333333),kmul(dz,dz)); @@ -226,7 +226,7 @@ static void ML_ADM_convertToADMBase_Body(cGH const * restrict const cctkGH, int CCTK_REAL_VEC alpL = alphaL; - CCTK_REAL_VEC dtalpL = ToReal(0); + CCTK_REAL_VEC dtalpL = ToReal(0.); CCTK_REAL_VEC betaxL = beta1L; @@ -234,11 +234,11 @@ static void ML_ADM_convertToADMBase_Body(cGH const * restrict const cctkGH, int CCTK_REAL_VEC betazL = beta3L; - CCTK_REAL_VEC dtbetaxL = ToReal(0); + CCTK_REAL_VEC dtbetaxL = ToReal(0.); - CCTK_REAL_VEC dtbetayL = ToReal(0); + CCTK_REAL_VEC dtbetayL = ToReal(0.); - CCTK_REAL_VEC dtbetazL = ToReal(0); + CCTK_REAL_VEC dtbetazL = ToReal(0.); /* Copy local copies back to grid functions */ vec_store_partial_prepare(i,lc_imin,lc_imax); |