diff options
| author | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2003-09-30 09:19:05 +0000 |
|---|---|---|
| committer | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2003-09-30 09:19:05 +0000 |
| commit | adb278b7109cc35ea4e934567ead92ac67c766a3 (patch) | |
| tree | 22671562a8134fa2c6c3a3bc4ad6259fc3d11890 /schedule.ccl | |
| parent | 882b46f42b3121931a23bca5ae54e397246793f9 (diff) | |
Now schedules EHFinder_MarkSurfaces followed by EHFinder_ApplySymSC in the
new group EHFinder_MarkPoints. This is because I finally got around to use
the CartGrid3D symmetry routines that were fixed some time ago to work on
integer variables as well.
Changed the name of EHFinder_IntegrateEquatorial to
EHFinder_IntegrateCircumference (exactly 31 characters long).
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/EHFinder/trunk@148 2a26948c-0e4f-0410-aee8-f1d3e353619c
Diffstat (limited to 'schedule.ccl')
| -rw-r--r-- | schedule.ccl | 18 |
1 files changed, 16 insertions, 2 deletions
diff --git a/schedule.ccl b/schedule.ccl index ab8b651..3e9f6ab 100644 --- a/schedule.ccl +++ b/schedule.ccl @@ -154,7 +154,13 @@ schedule EHFinder_CountSurfaces in EHFinder_CountMarkSurfaces SYNC: surface_index } "Check if there are more surfaces" -schedule EHFinder_MarkSurfaces in EHFinder_CountMarkSurfaces after EHFinder_CountSurfaces WHILE ehfinder::more_points +schedule GROUP EHFinder_MarkPoints in EHFinder_CountMarkSurfaces after EHFinder_CountSurfaces WHILE ehfinder::more_points +{ + TRIGGERS: eh_area, eh_centroid_x, eh_centroid_y, eh_centroid_z + TRIGGERS: eh_circ_eq, eh_circ_pol +} "Marking surfaces" + +schedule EHFinder_MarkSurfaces in EHFinder_MarkPoints { LANG: Fortran TRIGGERS: eh_area, eh_centroid_x, eh_centroid_y, eh_centroid_z @@ -162,6 +168,13 @@ schedule EHFinder_MarkSurfaces in EHFinder_CountMarkSurfaces after EHFinder_Coun SYNC: surface_index } "Mark points inside the current surface" +schedule EHFinder_ApplySymSC in EHFinder_MarkPoints after EHFinder_MarkSurfaces +{ + LANG: Fortran + TRIGGERS: eh_area, eh_centroid_x, eh_centroid_y, eh_centroid_z + TRIGGERS: eh_circ_eq, eh_circ_pol +} "Apply symmetries of the surface counter grid function" + schedule EHFinder_InfoSurfaces in EHFinder_Surfaces after EHFinder_CountMarkSurfaces { LANG: Fortran @@ -207,7 +220,7 @@ schedule EHFinder_IntegrateCentroid in EHFinder_Integration after EHFinder_Integ TRIGGERS: eh_centroid_x, eh_centroid_y, eh_centroid_z } "Calculate centroid integrals" -schedule EHFinder_IntegrateEquatorial in EHFinder_Integration after EHFinder_IntegrateArea +schedule EHFinder_IntegrateCircumference in EHFinder_Integration after EHFinder_IntegrateArea { LANG: Fortran STORAGE: surface_tmp_arrays, integrate_tmp_array @@ -321,6 +334,7 @@ if (CCTK_Equals(mode,"normal")) STORAGE: dfx STORAGE: dfy STORAGE: dfz + STORAGE: g3inv } "Calculate the source terms" if ( evolve_generators) |