Carpet: Correct handling of tapered grids

darcs-hash:20070809202205-dae7b-baa50974f8519fcde0b1351b6bb3ea72606a6388.gz

1 files changed, 8 insertions, 0 deletions

diff --git a/Carpet/Carpet/src/Evolve.cc b/Carpet/Carpet/src/Evolve.cc
index 4de4d431b..86a5c0dbc 100644
--- a/Carpet/Carpet/src/Evolve.cc
+++ b/Carpet/Carpet/src/Evolve.cc
@@ -54,6 +54,9 @@ namespace Carpet {
     // Timing statistics
     InitTiming (cctkGH);
     
+    // Tapered grids
+    do_taper = use_tapered_grids;
+    
     // Main loop
     static Timer timer ("Evolve");
     timer.start();
@@ -63,11 +66,14 @@ namespace Carpet {
       {
         int const do_every = maxtimereflevelfact / timereffacts.at(reflevels-1);
         if ((cctkGH->cctk_iteration - 1) % do_every == 0) {
+          bool const old_do_taper = do_taper;
+          do_taper = false;
           ENTER_GLOBAL_MODE (cctkGH, 0) {
             BEGIN_REFLEVEL_LOOP (cctkGH) {
               CallRegrid (cctkGH);
             } END_REFLEVEL_LOOP;
           } LEAVE_GLOBAL_MODE;
+          do_taper = old_do_taper;
         }
       }
       CallEvol (cctkGH);
@@ -89,6 +95,8 @@ namespace Carpet {
     } // end main loop
     timer.stop();
     
+    do_taper = false;
+    
     Waypoint ("Done with evolution loop");
     
     return 0;