From 6a650651d99b4d99799cebfa79f9521af804ae92 Mon Sep 17 00:00:00 2001 From: Erik Schnetter Date: Mon, 25 Sep 2006 22:07:00 +0000 Subject: CarpetReduce: Clean up source code darcs-hash:20060925220745-dae7b-eb145a85ef330dbff56b7d1c8844449dff85dd0b.gz --- Carpet/CarpetReduce/src/reduce.cc | 78 +++++++++++++++++++-------------------- 1 file changed, 39 insertions(+), 39 deletions(-) (limited to 'Carpet/CarpetReduce/src') diff --git a/Carpet/CarpetReduce/src/reduce.cc b/Carpet/CarpetReduce/src/reduce.cc index 9e83349ac..41be0b07b 100644 --- a/Carpet/CarpetReduce/src/reduce.cc +++ b/Carpet/CarpetReduce/src/reduce.cc @@ -480,15 +480,15 @@ namespace CarpetReduce { { assert (cgh); - assert (proc == -1 || (proc>=0 && proc=0 and proc=0); const int vartypesize = CCTK_VarTypeSize(outtype); assert (vartypesize>=0); - assert (num_outvals==0 || myoutvals); - assert (num_outvals==0 || mycounts); + assert (num_outvals==0 or myoutvals); + assert (num_outvals==0 or mycounts); assert (red); @@ -544,7 +544,7 @@ namespace CarpetReduce { { assert (cgh); - assert (proc == -1 || (proc>=0 && proc=0 and proc= 0); assert (num_outvals>=0); @@ -556,8 +556,8 @@ namespace CarpetReduce { assert (inarrays[n]); } - assert (num_outvals==0 || myoutvals); - assert (num_outvals==0 || mycounts); + assert (num_outvals==0 or myoutvals); + assert (num_outvals==0 or mycounts); assert (outtype == intype); @@ -603,7 +603,7 @@ namespace CarpetReduce { { assert (cgh); - assert (proc == -1 || (proc>=0 && proc=0 and proc=0); @@ -619,7 +619,7 @@ namespace CarpetReduce { for (int d=0; d=0); - assert (mynghostzones[d]>=0 && 2*mynghostzones[d]<=mylsh[d]); + assert (mynghostzones[d]>=0 and 2*mynghostzones[d]<=mylsh[d]); } const int vartypesize = CCTK_VarTypeSize(outtype); @@ -690,19 +690,19 @@ namespace CarpetReduce { { assert (cgh); - assert (proc == -1 || (proc>=0 && proc=0 and proc=0); - assert (outvals || (proc!=-1 && proc!=CCTK_MyProc(cgh))); + assert (outvals or (proc!=-1 and proc!=CCTK_MyProc(cgh))); const int vartypesize = CCTK_VarTypeSize(outtype); assert (vartypesize>=0); - assert (num_outvals==0 || myoutvals); - assert (num_outvals==0 || mycounts); + assert (num_outvals==0 or myoutvals); + assert (num_outvals==0 or mycounts); vector counts; - if (proc==-1 || proc==CCTK_MyProc(cgh)) { + if (proc==-1 or proc==CCTK_MyProc(cgh)) { counts.resize(vartypesize * num_outvals); } @@ -728,7 +728,7 @@ namespace CarpetReduce { } } - if (proc==-1 || proc==CCTK_MyProc(cgh)) { + if (proc==-1 or proc==CCTK_MyProc(cgh)) { for (int n=0; n=0 && proc=0 and proc=0); - assert (outvals || (proc!=-1 && proc!=CCTK_MyProc(cgh))); + assert (outvals or (proc!=-1 and proc!=CCTK_MyProc(cgh))); assert (num_inarrays>=0); assert (inarrays); @@ -807,7 +807,7 @@ namespace CarpetReduce { return -1; } - assert (num_dims>=0 && num_dims<=dim); + assert (num_dims>=0 and num_dims<=dim); for (int d=0; d=0); } @@ -819,7 +819,7 @@ namespace CarpetReduce { const bool do_local_reduction = num_outvals == 1; - if (! do_local_reduction) { + if (not do_local_reduction) { assert (num_outvals == lsize); } @@ -879,26 +879,26 @@ namespace CarpetReduce { assert (cgh); - assert (proc == -1 || (proc>=0 && proc=0 and proc=0); assert (num_outvals==1); - assert (outvals || (proc!=-1 && proc!=CCTK_MyProc(cgh))); + assert (outvals or (proc!=-1 and proc!=CCTK_MyProc(cgh))); assert (num_invars>=0); assert (invars); for (int n=0; n=0 && invars[n]=0 and invars[n]0); const int vi = invars[0]; - assert (vi>=0 && vi=0 and vi=0 && grpdim<=dim); + assert (grpdim>=0 and grpdim<=dim); for (int n=0; nreflevels() : reflevel+1; - int const minm = reduce_arrays ? 0 : want_global_mode || want_level_mode ? 0 : Carpet::map; - int const maxm = reduce_arrays ? 1 : want_global_mode || want_level_mode ? maps : Carpet::map+1; + int const minm = reduce_arrays ? 0 : want_global_mode or want_level_mode ? 0 : Carpet::map; + int const maxm = reduce_arrays ? 1 : want_global_mode or want_level_mode ? maps : Carpet::map+1; @@ -966,12 +966,12 @@ namespace CarpetReduce { // Number of necessary time levels CCTK_REAL const level_time = cgh->cctk_time / cgh->cctk_delta_time; bool need_time_interp - = (! reduce_arrays - && (fabs(current_time - level_time) + = (not reduce_arrays + and (fabs(current_time - level_time) > 1e-12 * (fabs(level_time) + fabs(current_time) + fabs(cgh->cctk_delta_time)))); - assert (! (! want_global_mode && need_time_interp)); - assert (! (reduce_arrays && need_time_interp)); + assert (not (not want_global_mode and need_time_interp)); + assert (not (reduce_arrays and need_time_interp)); int num_tl; if (need_time_interp) { @@ -1004,7 +1004,7 @@ namespace CarpetReduce { if (have_warned.empty()) { have_warned.resize (CCTK_NumVars(), false); } - if (! have_warned.at(vi)) { + if (not have_warned.at(vi)) { char * const fullname = CCTK_FullName(vi); CCTK_VWarn (1, __LINE__, __FILE__, CCTK_THORNSTRING, "Grid function \"%s\" has only %d time levels on refinement level %d; this is not enough for time interpolation", @@ -1039,7 +1039,7 @@ namespace CarpetReduce { } - assert (! need_time_interp || num_tl > 1); + assert (not need_time_interp or num_tl > 1); vector tfacs(num_tl); @@ -1075,12 +1075,12 @@ namespace CarpetReduce { assert (0); } - } else { // if ! need_time_interp + } else { // if not need_time_interp assert (num_tl == 1); tfacs.at(0) = 1; - } // if ! need_time_interp + } // if not need_time_interp @@ -1093,14 +1093,14 @@ namespace CarpetReduce { assert (grpdim<=dim); int lsh[dim], bbox[2*dim], nghostzones[dim]; ierr = CCTK_GrouplshVI(cgh, grpdim, lsh, vi); - assert (!ierr); + assert (not ierr); ierr = CCTK_GroupbboxVI(cgh, 2*grpdim, bbox, vi); - assert (!ierr); + assert (not ierr); ierr = CCTK_GroupnghostzonesVI(cgh, grpdim, nghostzones, vi); - assert (!ierr); + assert (not ierr); for (int d=0; d=0); - assert (nghostzones[d]>=0 && 2*nghostzones[d]<=lsh[d]); + assert (nghostzones[d]>=0 and 2*nghostzones[d]<=lsh[d]); } vect mylsh, mynghostzones; -- cgit v1.2.3