Uncomment the commented routine to check if re-initialization needs to be

undone. This is important when running on real data:-) This was uncommented
while working on getting re-initialization to work with Carpet, since it
doesn't work with Carpet yet. However, now it's only scheduled when PUGH is
active.


git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/EHFinder/trunk@191 2a26948c-0e4f-0410-aee8-f1d3e353619c

1 files changed, 9 insertions, 8 deletions

diff --git a/schedule.ccl b/schedule.ccl
index 5626817..28f8637 100644
--- a/schedule.ccl
+++ b/schedule.ccl
@@ -413,8 +413,8 @@ if (CCTK_Equals(mode,"normal"))
   } "Select f for boundary conditions"
 
   schedule GROUP ApplyBCs as EHFinderF_ApplyBCs in EHFinder_PostStep after EHFinder_ApplySymF
-{
-} "Apply boundary conditions (Symmetries)"
+  {
+  } "Apply boundary conditions (Symmetries)"
 
 
   # Set up the schedule group for re-initialization
@@ -508,6 +508,11 @@ if (CCTK_Equals(mode,"normal"))
       schedule GROUP Euler_PostStep as Euler_PostStepPUGH in Euler_ReInitialize after Euler_ReInitializeEvolve
       {
       } "Schedule group for Euler re-initialization post step"
+
+      schedule EHFinder_ReInitialize_Check in EHFinder_ReInitialize AFTER Euler_ReInitialize
+      {
+        LANG: Fortran
+      } "Check to see if re-initialization has to be undone"
     }
 
     if (CCTK_IsThornActive("Carpet"))
@@ -516,7 +521,7 @@ if (CCTK_Equals(mode,"normal"))
       {
         LANG: C
         OPTIONS: level
-      } "Carper version of the pre-reinitialization routines"
+      } "Carpet version of the pre-reinitialization routines"
 
 #      schedule EHFinder_ReInitialize_Wrapper in EHFinder_ReInitialize after EHFinder_PreReInitialize_Carpet WHILE ehfinder::carpet_re_init_control
       schedule EHFinder_ReInitialize_Wrapper in EHFinder_ReInitialize after EHFinder_PreReInitialize_Carpet WHILE ehfinder::re_init_control
@@ -527,10 +532,6 @@ if (CCTK_Equals(mode,"normal"))
       } "Wrapper routine for Euler re-initialization for Carpet"
     } 
 
-#    schedule EHFinder_ReInitialize_Check in EHFinder_ReInitialize AFTER Euler_ReInitialize
-#    {
-#      LANG: Fortran
-#    } "Check to see if re-initialization has to be undone"
   }
 
 #  schedule GROUP Euler_RotateTimeLevels
@@ -593,11 +594,11 @@ if (CCTK_Equals(mode,"normal"))
       LANG: Fortran
       SYNC: f
     } "Select f for boundary conditions"
-  }
 
   schedule GROUP ApplyBCs as EHFinderRK2_2_ApplyBCs in RK2_ReInitialize after Sym_RK2_2
     {
     } "Apply boundary conditions (symmetries)"
+  }
 
   # Schedule modifications of the mask in group EHFinder_SetMask