diff options
Diffstat (limited to 'schedule.ccl')
-rw-r--r-- | schedule.ccl | 29 |
1 files changed, 24 insertions, 5 deletions
diff --git a/schedule.ccl b/schedule.ccl index b9fba6e..f3f11a9 100644 --- a/schedule.ccl +++ b/schedule.ccl @@ -1,13 +1,24 @@ # Schedule definitions for thorn HydroAnalysis -STORAGE: Hydro_Analysis_rho_max -STORAGE: Hydro_Analysis_rho_max_loc -STORAGE: Hydro_Analysis_rho_center_volume_weighted +if (Hydro_Analysis_comp_rho_max || Hydro_Analysis_comp_rho_max_origin_distance) +{ + STORAGE: Hydro_Analysis_rho_max + STORAGE: Hydro_Analysis_rho_max_loc +} +if (Hydro_Analysis_comp_vol_weighted_center_of_mass) +{ + STORAGE: Hydro_Analysis_rho_sum + STORAGE: Hydro_Analysis_rho_center_volume_weighted STORAGE: Hydro_Analysis_rho_center_volume_weighted_gf[3] +} +if (Hydro_Analysis_comp_rho_max_origin_distance) +{ + STORAGE: Hydro_Analysis_rho_max_origin_distance +} + schedule group Hydro_Analysis AT POSTSTEP { - STORAGE: Hydro_Analysis_rho_sum } "Group for Hydro_Analysis routines" schedule Hydro_Analysis_PrepareReduction IN Hydro_Analysis @@ -22,7 +33,7 @@ schedule Hydro_Analysis_Reduction IN Hydro_Analysis AFTER Hydro_Analysis_Prepare OPTIONS: global } "Compute the global reduction results" -if (Hydro_Analysis_rho_max_search) +if (Hydro_Analysis_comp_rho_max || Hydro_Analysis_comp_rho_max_origin_distance) { schedule Hydro_Analysis_LocationSearch IN Hydro_Analysis AFTER Hydro_Analysis_Reduction { @@ -31,3 +42,11 @@ if (Hydro_Analysis_rho_max_search) } "Look for the location of the maximum density" } +if (Hydro_Analysis_comp_rho_max_origin_distance) +{ + schedule Hydro_Analysis_FindSeparation IN Hydro_Analysis AFTER Hydro_Analysis_LocationSearch + { + LANG: Fortran + OPTIONS: global + } "Compute the proper distance between the maximum of the density and the origin (along a straight coordinate line)" +} |