diff options
| author | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2004-09-29 21:08:41 +0000 |
|---|---|---|
| committer | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2004-09-29 21:08:41 +0000 |
| commit | 8933110ac8903c60c2551d29d92702bb07a66686 (patch) | |
| tree | 4bbcc55baed34b4d639c146eacf90b7d3e5053b0 /schedule.ccl | |
| parent | 01d84740ff60c0b5908350f7c8f960b7962dbeb2 (diff) | |
Fixed a bug that made the re-initialization only work in full mode.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/EHFinder/trunk@186 2a26948c-0e4f-0410-aee8-f1d3e353619c
Diffstat (limited to 'schedule.ccl')
| -rw-r--r-- | schedule.ccl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/schedule.ccl b/schedule.ccl index 1550011..5626817 100644 --- a/schedule.ccl +++ b/schedule.ccl @@ -10,6 +10,7 @@ else STORAGE: f[2] STORAGE: sf STORAGE: ftmp + STORAGE: sftmp STORAGE: eh_mask STORAGE: surface_arrays STORAGE: eh_area2, eh_centroid2_x, eh_centroid2_y, eh_centroid2_z @@ -340,6 +341,7 @@ schedule EHFinder_MoLRegister in MoL_Register schedule EHFinder_SetSym at CCTK_BASEGRID { LANG: Fortran + STORAGE: sftmp } "Register the symmetries for the level set function" @@ -407,6 +409,7 @@ if (CCTK_Equals(mode,"normal")) { LANG: Fortran SYNC: f + SYNC: sftmp } "Select f for boundary conditions" schedule GROUP ApplyBCs as EHFinderF_ApplyBCs in EHFinder_PostStep after EHFinder_ApplySymF @@ -418,7 +421,6 @@ if (CCTK_Equals(mode,"normal")) schedule GROUP EHFinder_ReInitialize at CCTK_POSTSTEP { - STORAGE: sftmp STORAGE: fbak STORAGE: eh_mask_bak # STORAGE: pugh_re_init_control, carpet_re_init_control @@ -464,10 +466,11 @@ if (CCTK_Equals(mode,"normal")) # Then synchronize the level set and apply symmetry boundary conditions. - schedule EHFinder_ApplySymF in Euler_ReInitializeEvolve after EHFinder_ReInitializeEuler + schedule EHFinder_ApplySymFSFTMP in Euler_ReInitializeEvolve after EHFinder_ReInitializeEuler { LANG: Fortran SYNC: f + SYNC: sftmp } "Select f for boundary conditions" schedule GROUP ApplyBCs as EHFinderF_ApplyBCs in Euler_ReInitializeEvolve after EHFinder_ApplySymF |